Delphi
2022-12-30
48
SetTextBuf设置文本文件内部缓冲区的大小procedure SetTextBuf( var f: Text; var Buf);procedure SetTextBuf( var f: Text; var Buf; Size: SizeInt);描述SetTextBuf将I / O缓冲区分配给文本文件。新缓冲区位于Buf,长度为Size个字节。如果省略Size,则假定为SizeOf(Buf)。任何文本文件的标准缓冲区为128个字节长。对于繁重的I / O操作,这可能会太慢。所述SetT
2022-12-30
35
Free和FreeAndNil之间的区别通过运行以下示例,可以正确保存位图吗?procedure TForm1.FormCreate(Sender: TObject);var bm: TBitmap;begin bm := TBitmap.Create; bm.LoadFromFile('C:\Users\Andreas Rejbrand\Documents\RAD Studio\6.0\Demos\DelphiWin32\VCLWin32\Football\up.bmp');
2022-12-30
95
使用Windows API的注意事项使用WPARAM / LPARAM时的注意事项传递给SendMessage / PostMessage / TControl.Perform的wParam和lParam参数必须强制转换为WPARAM / LPARAM,而不是整数/ LongInt值。//正确SendMessage(hWnd,WM_SETTEXT,0,LPARAM(@MyCharArray));//错误 SendMessage(hWnd,WM_SETTEXT,0,Integer(@MyCharArray
2022-12-30
148
delphi 64位汇编编程支持64位汇编代码。但是,有一些限制。所有例程(函数实现)都必须用汇编语言编写(汇编语言和Delphi语言不能混合使用)。64位Windows CPU的寄存器的宽度是32位Windows CPU的寄存器的两倍。对于分支的32位和64位汇编代码,可以使用下面的条件编译语法。 {$ IFDEF CPUX86} 汇编 // 32位汇编实现 结束; {$ ENDIF CPUX86} {$ IFDEF CPUX64} 汇编 // 64位汇编实现 结束
2022-12-30
18
function IsAppmethodInstalled( SVers: String ): Boolean;var Vers: Integer; i: Integer; DefApp: String;begin // check if Delphi is installed // 50 = Delphi5, 60 = Delphi 6 etc, // can check for ANY of multiple versions of delphi if separated by spac
2022-12-30
105
var Image1: TImage;[...]// VCLImage1.Picture.LoadFromFile('c:\mysvg.svg'); // FMXImage1.Bitmap.LoadFromFile('c:\mysvg.svg');var Bitmap: TBitmap; Picture: TPicture;begin Bitmap := TBitmap.Create; try Picture := TPicture.Create; try Pi
2022-12-30
93
这是Embarcadero的MVP开发人员Andrea Magni的文章。 在本文中,我们共享QR /条角扫描仪应用程序ScannerMApp的技术(开源)和Delphi代码。 已经有许多条形码/ QR码应用程序,但是通过向产品添加功能来扩展功能似乎很容易。ZXing和TFrameStand这两个开放源代码用于实现此功能。(可以从Getit Package Manager获得TFrameStand。)详细查看全文(英语):https : //blog.andreamagni.eu/2017/06/sc
2022-12-30
69
这些是FMX Express(http://www.fmxexpress.com/)分发的Delphi示例代码资料,这些资料提供了许多FireMonkey开发人员费用。 您可以下载50个跨平台示例,以用于Delphi 10.3版。 特别地,它被配置为使得可以使用组件使用更少的编码来完成更多的工作。这些示例包括从JSON和XML到REST和设备利用率的各种主题。 这些演示还可以在Android,iOS,macOS,Windows,Linux和HTML5上分发。 下载示例代码:https : //gith