2022-12-25 53 0

Delphi 取时间戳 uses System.DateUtils;edit1.text := DateTimeToUnix(now,False).ToString;来源：http://www.xuexidashi.vip/h-nd-1625.html#_np=125_826

2022-12-25 37 0

Delphi中的Memo顶部添加行Memo.Lines.Insert(0, 'string 0');

2022-12-25 31 0

如何禁止用户更改窗体的大小设置窗体的BorderIcons.biMinimize = false和BorderIcons.biMaximize = false。窗体的事件OnCanResize，代码如下： procedure TForm1.FormCanResize(Sender: TObject; var NewWidth, NewHeight: Integer; var Resize: Boolean);begin Resize := False;end;来源：http://www.xuexid

2022-12-25 222 0

以下中文由谷歌翻译而来。在RAD Studio 10.4中，VCL应用程序将能够使用新的基于Chromium的Edge浏览器控件查看Web内容并与之交互。这个新的TEdgeBrowser组件是Microsoft WebView2组件的包装。TEdgeBrowser替代了TWebBrowser，后者使用传统的IE（Internet Explorer）WebBrowser控件。但是，TWebBrowser仍保留在VCL组件集中，并进行了一些显着更改（请参阅下面的“ TWebBrowser发生了什么”）。TE

2022-12-25 99 0

此函数是判断一串字符里，是否存在中语汉字，使用的是汉字对应ASCII码原理，如果某个字符串转成ASCII码，且这个ASCII码是在汉字区域范围的，就认为是存在汉字 。// 基本汉字 20902字 4E00-9FA5// 基本汉字补充 74字 9FA6-9FEF// 扩展A 6582字 3400-4DB5// 扩展B 42711字 20000-2A6D6// 扩展C 4149字 2A700-2B734// 扩展D 222字 2B

2022-12-25 45 0

Delphi中的记录可以具有任何数据类型的字段。当一条记录具有普通（非托管）字段（如数字或其他枚举值）时，对于编译器没有太多工作要做。创建和处理记录包括分配内存或摆脱内存位置。如果记录具有由编译器管理的类型的字段（例如字符串或接口），则编译器需要注入额外的代码来管理初始化或终结。例如，对字符串进行引用计数，因此当记录超出范围时，记录内的字符串需要减少其引用计数，这可能导致为该字符串取消分配内存。因此，当您在代码的一部分中使用这种托管记录时，编译器会自动在该代码周围添加一个try-finally块，并确保

2022-12-25 26 0

方法1procedure TForm1.Button1Click(Sender: TObject);const iStep = 2;var Idx: integer;begin for Idx :=0 to Length(Memo1.Lines.Text)div iStep do Memo2.Lines.Add('【'+Memo1.Lines.Text.Substring(Idx*iStep, iStep)+'】');end;方法2procedure TFor

2022-12-25 23 0

unit Unit1;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;type TForm1 = class(TForm) Memo1: TMemo; Button1: TButton; Memo2: TM