Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.024 c
1-63102
EgorT
2004-01-08 12:24
2004.01.20
Как при помощи Delphi записать формулу в Excel


1-63145
Kettle of delphi
2004-01-10 15:50
2004.01.20
OnPaint окна приложения


14-63380
avk02
2003-12-28 04:45
2004.01.20
Грядёт 200-й выпуск дайджеста форумов delphimaster.ru!


1-63132
Grotesk
2004-01-07 19:38
2004.01.20
VarArrayOf ( Динамический_Массив )


6-63279
Evgen!
2003-11-18 07:36
2004.01.20
Доступ к файлу по сети




   Наверх