Форум: "Основная";
Текущий архив: 2003.06.02;
Скачать: [xml.tar.bz2];
Вниз
TSpeedButton Найти похожие ветки
← →
DeadMeat (2003-05-20 17:07) [0]Товарищи... Сограждане... Кто знает почему при динамической загрузке Icon-а в SpeedButton для Glyph-а, он становится прозрачным там, где не надо, т.е. становится блеклым... Хотя если этот-же Icon загрузить... ну хотя-бы в Image, то всё нормально... Может кто знает как это лечить... Заранее спасибо!!
← →
Юрий Зотов (2003-05-20 17:12) [1]Enabled не False?
← →
Palladin (2003-05-20 17:36) [2]редактируй изображение, малюй каким нибудь абсолютно левым цветом те участки которые должны быть прозрачны, и конечно же пометь этим же цветом самый нижний левый пиксель
← →
DeadMeat (2003-05-22 13:40) [3]> Юрий Зотов
Ооочень смешноо... Ну естественно неет... Хотя если по Disable-енному объекту можно щёлкнуть без всяких примочек, то может быть и False... :))
> Palladin
Чаво то не понял... в смысле редактировать иконку?... А как я узнаю какие участки у неё прозрачные... А даже если узнаю, то как их закрашивать, да и зачем если они прозрачные... Ты видно не понял... Я не знаю какую иконку придётся вешать... В этом вся проблема...
← →
Anatoly Podgoretsky (2003-05-22 13:45) [4]Ну если не знаешь, какие прозрачные, то никак
← →
Palladin (2003-05-22 13:45) [5]выставляй у Bitmap Transparent:=false;
← →
AlexSV (2003-05-22 13:52) [6]А как установлено св-во SpeedButton"а Transparent?
По умолчанию
SpeedButton.Transparent - True
Image.Transparent - False
← →
Palladin (2003-05-22 13:58) [7]
> AlexSV © (22.05.03 13:52)
при чем тут SpeedButton.Transparent... он к Glyph никак не относится...
> Image.Transparent - False
ты уверен? если он грузит иконку то у нее Transparent по умолчанию true
да и не Image а Glyph
← →
Johnmen (2003-05-22 14:11) [8]>при динамической загрузке Icon-а в SpeedButton для Glyph-а,
А как вот это осуществляется ? Приведи код.
← →
AlexSV (2003-05-22 14:18) [9]> Palladin © (22.05.03 13:58)
> при чем тут SpeedButton.Transparent... он к Glyph никак не относится...
Может быть, только в процедуре TSpeedButton.Paint есть такая строка
TButtonGlyph(FGlyph).Draw(Canvas, PaintRect, Offset, Caption, FLayout, FMargin,
FSpacing, FState, Transparent, DrawTextBiDiModeFlags(0));
← →
Palladin (2003-05-22 14:27) [10]мда, действительно, я не прав, ну тогда подмена цвета...
← →
AlexSV (2003-05-22 14:45) [11]> DeadMeat ©
Попробуй еще поиграться свойством
TSpeedButton.Glyph.TransparentMode
← →
DeadMeat (2003-05-22 15:53) [12]Я очень извиняюсь перед всеми участниками данной дискуссии за то что ввёл вас немного в заблуждение неправильной формулировкой вопроса... Я не совсем подгружаю значок из файла... Я достаю его через HICON из окна... Вот код:
procedure TForm1.Button1Click(Sender: TObject);
var icon:ticon;
iconsm:THandle;
hnd:hwnd;
begin
hnd:=findwindow (nil,"about:blank - Microsoft Internet Explorer");
speedbutton1.width:=40;
speedbutton1.height:=40;
speedbutton1.glyph.width:=16;
speedbutton1.glyph.height:=16;
speedbutton1.glyph.transparent:=true;
speedbutton1.glyph.transparentMode:=tmauto;
speedbutton1.transparent:=true;
iconsm := getclassLong(hnd, GCL_HICONSM);
icon := ticon.create;
icon.Handle:=iconsm;
speedbutton1.glyph.canvas.draw(0, 0, icon);
end;
Перед запуском надо запустить Internet Explorer с чистым листом...
Ещё раз извинияюсь...
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.06.02;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.009 c
