запускалась в правом нижнем углу

[khvalera]

Как сделать в Delphi, что бы форма при запуске запускалась в правом нижнем углу.

[khvalera]

В идеале



Код:

Код: Выделить всё

procedure TForm1.FormCreate(Sender: TObject);
begin
  Form1.Top  := Screen.Height-Form1.Height;
  Form1.Left := Screen.Width-Form1.Width;
end;

Но придется пару пикселей минусовать т.к. форма может чуток "поехать" за экран.

Советик: сперва подумайте как бы вы, будучи человеком ,реализовали бы ту или иную задачу - это вам чертовски поможет.

[khvalera]

Благодарю за помощь!!!

begin

Form1.Top  := Screen.Height-Form1.Height-25;

Form1.Left := Screen.Width-Form1.Width;

end;

[khvalera]

khvalera, тег кода используйте в будущем, если не трудно.