Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Левый нижний угол экрана [D6, Win95/98]


Shluz ©   (2002-12-09 12:51:00) 

Уважаемые мастера, такой возник вопро: как поместить свою форму в левый нижний угол экрана с учетом панели управления ??
Пробывал :
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:00) [1]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо