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

Вниз

Как создать неформальное окно   Найти похожие ветки 

 
Iks   (2004-01-11 19:12) [0]

Подскажите как создать неформальное окно {круглу я знаю}


 
YuRock ©   (2004-01-11 19:14) [1]

Попробуйте SetWindowRgn()


 
Iks   (2004-01-11 19:21) [2]

Кроме SetWindowRgn() есть ли какие ещё процедуры


 
YuRock ©   (2004-01-11 19:29) [3]

Ну можно еще создать обычное прозрачное окно без бордюра. Примерно так:


var
wc: TWNDCLASS;
lb: TLOGBRUSH;
begin
...
lb.lbStyle := BS_NULL;
wc.hbrBackground := CreateBrushIndirect(lb);
...
CreateWindow(...);
...
end;


 
YuRock ©   (2004-01-11 19:29) [4]

А потом просто рисовать на нем (круг, квадрат - что хотите)...


 
Iks   (2004-01-11 19:36) [5]

Благодарю! Попробуем!!!



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

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

Наверх




Память: 0.47 MB
Время: 0.01 c
3-72686
azazello
2003-12-25 01:14
2004.01.23
Проектирования базы данных


3-72664
int64
2003-12-25 16:43
2004.01.23
Деревья, Delphi и MSSQL.


1-72806
uu
2004-01-12 19:56
2004.01.23
currency


1-72759
termos
2004-01-13 16:09
2004.01.23
массив записей


1-72827
MVova
2004-01-13 15:41
2004.01.23
TADOConnection и TThread