Главная страница
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.016 c
1-72753
Anton.
2004-01-13 16:43
2004.01.23
TGetExtentsFunc = function(Index: Longint): Integer of object;


8-72846
DeadMeat
2003-09-19 13:47
2004.01.23
GLScene и камера


8-72848
Lancelot
2003-09-19 20:09
2004.01.23
Масштабирование изображения


3-72634
Hyzhak
2003-12-24 19:33
2004.01.23
ADO и EInvalidOp , в чем связь???


8-72847
Jonson
2003-09-20 10:03
2004.01.23
OpenGL в Delphi