Главная страница
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.03 c
1-72715
Vi0let
2004-01-12 03:19
2004.01.23
Как написать одну общую процедуру для форм.


14-72932
Gero
2003-12-31 23:07
2004.01.23
Админы! Проснитесь!


14-72888
Teren
2004-01-02 01:46
2004.01.23
Почему возникает ошибка?


1-72823
Cosinus
2004-01-12 14:22
2004.01.23
Работа с bin-файлом, находящимся в теле программы


3-72642
Paul
2003-12-26 14:42
2004.01.23
Базы данных