本文整理自网络,侵删。
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 fdconnection1.gettablenames 查看所有表包含用户表和系统表
Delphi cxdbtreelist:最简单的节点图标添加方法
更多相关阅读请进入《Delphi》频道 >>