本文整理自网络,侵删。
procedure TForm1.FormCreate(Sender: TObject);begin Self.Left:= Screen.WorkAreaWidth-Self.Width-8; Self.Top:= Screen.WorkAreaHeight-Self.Height-12;end;
演示
相关阅读 >>
更多相关阅读请进入《Delphi》频道 >>
本文整理自网络,侵删。
procedure TForm1.FormCreate(Sender: TObject);begin Self.Left:= Screen.WorkAreaWidth-Self.Width-8; Self.Top:= Screen.WorkAreaHeight-Self.Height-12;end;
演示
相关阅读 >>
更多相关阅读请进入《Delphi》频道 >>
管理员已关闭评论功能...