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

Вниз

CheckBox прозрачный   Найти похожие ветки 

 
Sewix   (2003-09-13 09:03) [0]

Как сделать, что бы CheckBox был прозрачным? Он у меня на картинке стоит.


 
dataMaster   (2003-09-13 11:25) [1]

Испльзуй в паре Check+Label


 
sewix   (2003-09-14 20:14) [2]


> dataMaster

так нестабильно работает


 
Ученик   (2003-09-14 20:53) [3]

>Sewix © (13.09.03 09:03)

procedure WMCtlColorStatic(var Message : TWMCtlColorStatic); message WM_CTLCOLORSTATIC;

procedure TForm1.FormShow(Sender: TObject);
begin
SetWindowLong(CheckBox1.Handle, GWL_EXSTYLE,
GetWindowLong(CheckBox1.Handle, GWL_EXSTYLE) or WS_EX_TRANSPARENT);
CheckBox1.Brush.Style := bsClear
end;

procedure TForm1.WMCtlColorStatic(var Message : TWMCtlColorStatic);
begin
if Message.ChildWnd = CheckBox1.Handle then
SetBkMode(Message.ChildDC, TRANSPARENT);
inherited
end;


 
Um   (2003-09-15 09:34) [4]

>Ученик
Клёво,а нельзя без обработки события на паренте,
а то принцип не пойму,
а форму можно сделать таким образом TRANSPARENT


 
HolACost!   (2003-09-15 10:35) [5]

sewix © (14.09.03 20:14) [2]
А в чём проблема-то? Почему не стабильно работает?


 
NAlexey   (2003-09-15 11:01) [6]

>Ученик
Извини за вопрос, нет времени пробывать выполнить твой код, но ты уверен что он рабочий?


 
Song   (2003-09-15 11:02) [7]

Вот народ ленивый пошёл, а проверить слабо?


 
NAlexey   (2003-09-15 11:07) [8]

Хм... Действительно, рабочий пример.


 
sewix   (2003-09-17 08:08) [9]

.
> HolACost! ©

Нестабильность в том, что НЕ при каждом клике на label срабатывает флажок. Да и выглядит не естественно - нет пунктироного выделения label.


 
HolaCost!   (2003-09-17 08:10) [10]

Если не критично, то можно свой написать!



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

Форум: "Основная";
Текущий архив: 2003.09.29;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.01 c
8-96310
dimushkin
2003-05-30 09:46
2003.09.29
Как правильно убить TBitmap ?


14-96361
Jacob
2003-09-11 23:42
2003.09.29
Реестр


3-96114
alextim
2003-09-07 18:26
2003.09.29
Как из клиентской программы создать новую таблицу IB


1-96241
Nikulin
2003-09-17 14:13
2003.09.29
Помогите разобраться и понять в чем я не прав...


7-96462
Nevermind
2003-07-15 08:43
2003.09.29
Стили оформления (XP, Классический)





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский