本文整理自网络,侵删。
procedure CreateParams(var Params: TCreateParams); override;
procedure MainForm.Createparams(var Params: TCreateParams);begin inherited; With Params do begin WndParent := Application.MainForm.Handle; Params.ExStyle := WS_EX_TOPMOST; end;end;
相关阅读 >>
Delphi firemonkey里触发home按键被按下的事件
Delphi通过adoquery控件实现sqlserver数据库多结果集的数据打印
Delphi 在firemonkey应用程序中使用torientationsensor获取设备倾斜和指南针航向
Delphi 一组数据,按由大到小进行排序,并输出最大值与最小值
更多相关阅读请进入《Delphi》频道 >>