本文整理自网络,侵删。
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 在firemonkey应用程序中使用torientationsensor获取设备倾斜和指南针航向
更多相关阅读请进入《Delphi》频道 >>