PDA

Показать полную графическую версию : запускалась в правом нижнем углу


khvalera
10-06-2004, 23:47
Как сделать в Delphi, что бы форма при запуске запускалась в правом нижнем углу.

Prisoner
11-06-2004, 02:07
В идеале
procedure TForm1.FormCreate(Sender: TObject);
begin
 Form1.Top  := Screen.Height-Form1.Height;
 Form1.Left := Screen.Width-Form1.Width;
end;
Но придется пару пикселей минусовать т.к. форма может чуток "поехать" за экран.
Советик: сперва подумайте как бы вы, будучи человеком ,реализовали бы ту или иную задачу - это вам чертовски поможет.

khvalera
13-06-2004, 18:23
Благодарю за помощь!!!
begin
Form1.Top  := Screen.Height-Form1.Height-25;
Form1.Left := Screen.Width-Form1.Width;
end;

Prisoner
13-06-2004, 20:59
khvalera, тег кода используйте в будущем, если не трудно.




© OSzone.net 2001-2012