Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Программирование и базы данных (http://forum.oszone.net/forumdisplay.php?f=21)
-   -   запускалась в правом нижнем углу (http://forum.oszone.net/showthread.php?t=29663)

khvalera 10-06-2004 23:47 205209

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

Prisoner 11-06-2004 02:07 205210

В идеале
Код:

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 205211

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

Prisoner 13-06-2004 20:59 205212

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


Время: 06:50.

Время: 06:50.
© OSzone.net 2001-