Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.48 MB
Время: 0.064 c
6-63269
Карелин Артем
2003-11-19 13:52
2004.01.20
Ftp-сервер на ICS. Как передавать/принимать потоки. Не файлы.


3-63012
BlackCat
2003-12-23 04:17
2004.01.20
Как отфильтровать таблицу по указанному полю (MS Access + ADO)


14-63371
xman
2003-12-29 15:34
2004.01.20
ГЛЮК


14-63405
Undert
2003-12-27 19:38
2004.01.20
Как впихать wav или лучше MP3 в ресурсы Delphi и застваить чем-ни


1-63213
Шурик Ш
2004-01-09 17:45
2004.01.20
Ералаш: Excel неадекватно реагирует на команды...