Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.02.13;
Скачать: CL | DM;

Вниз

Левый нижний угол экрана   Найти похожие ветки 

 
Shluz ©   (2002-12-09 12:51) [0]

Уважаемые мастера, такой возник вопро: как поместить свою форму в левый нижний угол экрана с учетом панели управления ??
Пробывал :
var
ScreenDc:HDC;
begin
ScreenDc:=GetDC(0);
try
form1.top:=screen.Height-form1.height;
form1.left:=screen.width-form1.Width;
finally releasedc(0,screendc); но панель управления не учитывается..


 
sniknik ©   (2002-12-09 13:04) [1]

isFormShift:= ((Form1.Left + Form1.Width) >= Screen.Width) or
((Form1.Top + Form1.Height) >= Screen.WorkAreaHeight);
if iHo = 0 then begin
Form1.Caption:= "



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

Текущий архив: 2003.02.13;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.031 c
1-38211
diks
2003-02-04 16:15
2003.02.13
Пароль


14-38455
Makhanev A.S.
2003-01-30 15:54
2003.02.13
Delphi6 Update Pack#2


1-38153
AlexanderSK
2003-02-04 12:50
2003.02.13
Разбиение приложение на модули


1-38346
Grandpa
2003-01-31 11:04
2003.02.13
TStringGrid


14-38568
Sergo
2003-01-25 12:48
2003.02.13
Для тех кто живет в США