Главная страница
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-72818
Шурик Ш
2004-01-12 16:20
2004.01.23
Как получить номер строки и столбца TStringGrid, на котором...


1-72752
senya
2004-01-13 18:27
2004.01.23
Изображение не помещается на форме и полосы прокрутки не появляют


4-72982
DDS
2003-11-17 18:53
2004.01.23
Как перевести текст из кодировки DOS>WIN


14-72893
Shopot
2004-01-03 11:16
2004.01.23
BMP-шка в паскале


1-72758
bloodman
2004-01-13 15:50
2004.01.23
Есть ли Delphi для КПК? или хотя бы паскль??