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

Вниз

КАк установить высоту окна   Найти похожие ветки 

 
anod ©   (2002-08-13 12:28) [0]

Пишу так
GetObject(hbmp, SizeOf(Bitmap), @bmp);
Width:=bmp.bmWidth; Height:=bmp.bmHeight;
ShowMEssage(IntToStr(Width)+" : "+intToStr(Height));
SetWindowLong(Handle, GWL_STYLE,GetWindowLong(Handle, GWL_STYLE)and not WS_CAPTION);
SetWindowPos(Handle,HWND_TOPMOST,20,0,Width,Height,SWP_NOZORDER);
SetWindowRgn(Handle,CreateRgnFromBitmap(hbmp,bmp),true);


На экран выдает правильно, а так - ширина нормальная, а высота больше пикселей на 5. Мне кажется, что это из-за капшона, как установить его отсутствие??


 
Dmk ©   (2002-08-14 03:01) [1]

BorderStyle := bsNone - это окно без caption,
а так можно узнать высоту caption

H := GetSystemMetrics(SM_CYCAPTION)
SM_CYCAPTION Height, in pixels, of a normal caption area. (MSDN)



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

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

Наверх




Память: 0.46 MB
Время: 0.012 c
1-98080
Борис
2002-09-19 15:07
2002.09.30
Помогите обратится к компоненту, расположенному на другой форме!


1-98105
Gayrus
2002-09-18 03:38
2002.09.30
BmpToTexture


1-98160
X-Vizitor
2002-09-17 23:53
2002.09.30
Можно ли изменить у TStringGrid a


14-98324
ded_di
2002-09-05 12:53
2002.09.30
редактор запросов


3-97946
VaZ
2002-09-05 09:06
2002.09.30
Еще раз о больном: Calculated Fields