Текущий архив: 2004.01.20;
Скачать: CL | DM;
Вниз
StaticText Найти похожие ветки
← →
DillerXX (2003-11-15 17:48) [0]Я помещаю на рабочий стол TStaticText, но под ним остаётся серая полоса. Как её убрать. Transparent пробовал.
← →
Prov (2003-11-16 11:14) [1]SetWindowLong, стиль WS_EX_TRANSPARENT
← →
DillerXX (2003-11-16 18:42) [2]А в ФАК слабо глянуть? Там Игорь Шевченко приводит отличный код!! В разделе АПИ поищи...
← →
DillerXX (2003-11-16 18:43) [3]Фу, блин!! Это я не сюда хотел...
← →
DillerXX (2003-11-16 19:00) [4]А SetWindowLong, стиль WS_EX_TRANSPARENT не получается. Только текст жирным становится. Короче вот как я пишу:
h := FindWindow("Progman", nil);
t:=TStaticText.Create(Self);
t.Top:=270;
t.Left:=390;
t.Caption:="Передача данных успешно завершена";
t.Width:=GetTextWidth(t.Caption,SendMessage(Handle, WM_GETFONT, 0, 0));
t.ParentWindow:=h;
t.Transparent:=true;
// SetWindowLong(t.Handle,0,WS_EX_TRANSPARENT);
t.Visible:=true;
t.Transparent:=true;
GetTextWidth
← →
DillerXX (2003-11-16 19:00) [5]А SetWindowLong, стиль WS_EX_TRANSPARENT не получается. Только текст жирным становится. Короче вот как я пишу:
h := FindWindow("Progman", nil);
t:=TStaticText.Create(Self);
t.Top:=270;
t.Left:=390;
t.Caption:="Передача данных успешно завершена";
t.Width:=GetTextWidth(t.Caption,SendMessage(Handle, WM_GETFONT, 0, 0));
t.ParentWindow:=h;
t.Transparent:=true;
// SetWindowLong(t.Handle,0,WS_EX_TRANSPARENT);
t.Visible:=true;
t.Transparent:=true;
GetTextWidth это моя функция. Только не пишите мне то, что я случайно написал выше. ;)
← →
DillerXX (2003-11-16 19:01) [6]Мать твою ;)! Опять глюки!
← →
Prov (2003-11-16 19:36) [7]Вот, только что пробовал, всё работает: SetBkmode(Form1.Combobox1.canwas.handle, TRANSPARENT);
← →
DillerXX (2003-11-17 14:40) [8]
> SetBkmode(Form1.Combobox1.canwas.handle, TRANSPARENT);
Вот только что пробовал: нифига не работает :) Что получится то должно?? КомбоБокс как КомбоБокс :)
Страницы: 1 вся ветка
Текущий архив: 2004.01.20;
Скачать: CL | DM;
Память: 0.45 MB
Время: 0.009 c