Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.01.23;
Скачать: [xml.tar.bz2];

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.006 c
3-72691
bon
2003-12-27 11:45
2004.01.23
SumList в DBGridEh


14-72879
Teren
2004-01-01 23:33
2004.01.23
Delphi 8 .NET


14-72936
MagaSoft
2004-01-03 21:24
2004.01.23
Кто как или расстановка форм.


14-72905
Teren
2003-12-31 20:59
2004.01.23
Хочу быть программистом


6-72853
Stas1
2003-11-20 15:54
2004.01.23
Post





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский