Скачать: CL | DM;

Окно приложения прижать к панели задач (справа/слева)   Найти похожие ветки 

← →
Denizzz   (2005-09-21 12:54) [0]

Привет спецам!
Как сделать чтобы окно приложения при открытии прижалось к панели задач (или справа, или слева)?

---

← →
Игорь Шевченко ©   (2005-09-21 13:50) [1]

> Как сделать чтобы окно приложения при открытии прижалось
> к панели задач (или справа, или слева)?


А панель задач при этом где находится ?

---

← →
ShiFT   (2005-09-21 14:30) [2]

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

---

← →
Denizzz   (2005-09-21 14:36) [3]

спасибо.
но уже сам разобрался:

var r:TRect;

begin
 SystemParametersInfo(SPI_GETWORKAREA, 0, @r, 0);
 Form1.Top:=r.bottom-Form1.Height;
 Form1.Left:=r.right-Form1.Width;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.026 c