各 Delphi 歷史版本下載合集

此頁面記錄各Delphi歷史版本官網的連結位址下載合集,
供喜歡Delphi的各位愛好者下載,此頁面會持續更新同步最新官網發佈下載地址。

 Rad Studio Delphi 10.4.1

https://altd.embarcadero.com/download/radstudio/10.4/radstudio_10_4_101461a.iso

Size: 6406551552 bytes 
MD5: 952F87F0001D5A5E2310CBC8B5D7FEBF
SHA1: 38F887A9F9D41117D9F79E1C670E99CDD2FA7319
CRC32: E0B8D941

 

 Rad Studio Delphi 10.4  Sydney

FirDAC 对 SQLite 数字, int64也会被截断,会出现负数情况处理

FirDAC 对 SQLite 数字,   int64也会被截断,会出现负数情况处理  先用以下方法设置一下

var
  MR: TFDMapRule;
begin
  FDQuery1.FormatOptions.OwnMapRules:= True;
  MR:= FDQuery1.FormatOptions.MapRules.Add;
  MR.SourceDataType:= dtInt32;
  MR.TargetDataType:= dtInt32;

  继续其它代码操作

end;

【原创】Delphi fmx 获取控件句柄

Fmx 框架控件如果 从 TPresentedControl 类继承下来的,会有一个属性,ControlType,它是一个枚举。

打开 FMX.Controls 单元定义:TControlType = (Styled, Platform);   

控件的ControlType属性默认为 Styled,如果使用 Platform ,则使用当前平台原生创建。

在 Win 平台原生创建是有句柄的。我通过遍历里面的对象,获取到它的 TWinNativeScene 类,取出句柄。

原码如下:

uses

  FMX.Controls.Presentation, FMX.Presentation.Win.Style, FMX.Controls 

標籤 (Tags)

枚举Resource资源名

implementation


{$R 'res.res'}


{$R *.dfm}
Function EnumResNameProc (hModule: HMODULE; lpType, lpName: PChar; lParam: Longint) :BO0L; stdcall
var
hResource: HRSRC;
Begin
    hResource:=FindResource (hModule, lpName, lpType);
    if hResource<> 0 then
    Form1.Memol.Lines.Add(lpName);
    Result:=True;
End;

EdgeBrowser 控件的环境部署

EdgeBrowser 控件是 Delphi 10.4 VCL 新的控件,支持微软最新未发布的浏览器。

 EdgeBrowser.Navigate(‘www.DelphiFmx.com’) 可以直接打开网址。

使用的前提是得有对应的 WebView2Loader 和 对应的 edge版本,因为现在 微软还没有正式推送,只有测试版本。

在Delphi 10.4 里的demo路径里 :C:\Users\Public\Documents\Embarcadero\Studio\21.0\Samples\Object Pascal\VCL\WebBrowser\Edge 

有这个控件使用的 demo ,非常简单。


环境部署:

     第1步,下载 Edge 浏览器安装:  https://www.microsoftedgeinsider.com/zh-cn/download/

应用DevExpress里的气泡组件 cxHintStyleController

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, cxLookAndFeelPainters, StdCtrls, cxButtons, cxHint, cxControls,
  cxContainer, cxEdit, cxTextEdit, cxMaskEdit, ExtCtrls, cxLabel,
  cxDropDownEdit, cxImageComboBox, ComCtrls, cxColorComboBox,
  cxFontNameComboBox, cxListBox;

標籤 (Tags)