Delphi 在FireMonkey应用程序中设置Application.Title

本文整理自网络，侵删。

 
uses Winapi.Windows, FMX.Platform.Win;

procedure TForm1.FormCreate(Sender: TObject);
var
  app: HWND;
begin
  //Application.Title := 'New Application Title';
  app := GetWindow(WindowHandleToPlatform(Self.Handle).Wnd, GW_OWNER);
  SetWindowText(app, 'New Application Title');
end;
 

相关阅读 >>

Delphi shellexecute openurl 的跨平台实现

Delphi 数组竟然可以这样定义

Delphi tstringstream 简单用法

Delphi 创建文件夹并打开

Delphi xe7使用本身的md5单元进行字符串加密

Delphi新建服务，停止系统服务，以及获取服务状态和新建系统服务器的方法

Delphi 释放res资源文件

Delphi xe更改ttrayicon系统任务栏图标（无模糊）

Delphi压缩图片代码

Delphi图像处理 -- 图像卷积

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi 在FireMonkey应用程序中设置Application.Title