FranzB
-
Content Count
55 -
Joined
-
Last visited
Posts posted by FranzB
-
-
always full path like:
Quotec:\temp\user data\reports\my tiny new report.txt'
variation : OS language, Computer hardware ,......
-
I'm suffering some strange issue, guessing that the function fileexist will not work 100 % stable,
if I check for filenames with several spaces ....
filenamestr := 'my report from home.csv' if fileexists () then begin .... end else begin ..... end;
on some computers, some folders, ... this seems to work, other computer and folder structure this call fails ....
-
the identical setup as mentioned here , I did on second computer, now with MYSQL database server
how to evaluate the correct connection parameters using Delphi and firedac @ LINUX
-
I'm running 2 MSSQL Servers on my Computer
MSSQL Server #1 : installed on WIN 10 Host OS on my Computer
MSSQL Server #2 : installed on VM Ware LINUX ( UBUNTU 18.04) Client, I also installed AZURE data studio inside the VM Ware OS
Q1 : How to connect from AZURE data studio to SQL Server #2, I failed with different settings so far :-(, what will be the correct server name ??
Q2 : How to connect to MSSQL Server #1 on HOST OS ?? Computername\sqlexpress does not work from AZURE data studio, but this works fine connecting directly from HOST OS to this MSSQL server
I#m using VM network settings = Bridged
Draw TBitmap
in FMX
Posted · Edited by FranzB
I want to insert a bitmap on it's own left side again using canvas.drawbitmap function
but actually this code does not do anything..... can't see my mistake here 😞
procedure InsertonMyleft(aBMP : TBitmap); var tempBMP: TBitmap; RecFull: TRectF; RecLeft: TRectF; begin tempBMP := TBitmap.Create; try aBMP.Canvas.BeginScene; tempBMP.Assign(localBMP); tempBMP.SaveToFile('c:\temp\debugme.bmp'); RecFull := RectF(0, 0, aBMP.Width, aBMP.Height); RecLeft := RectF(0, 0, round(aBMP.Width / 3), round(aBMP.Height / 1)); aBMP.Canvas.DrawBitmap(tempBMP, RecFull, RecLeft, 50, True); aBMP.Canvas.EndScene; aBMP.SaveToFile('c:\temp\debugme2.bmp'); finally tempBMP.Free; end; end;