Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.09;
Скачать: CL | DM;

Вниз

Как в Image1 отобразить иконку файла ???   Найти похожие ветки 

 
KvORubin ©   (2002-04-24 13:30) [0]

Как в Image1 отобразить иконку файла ???
по такому то адресу: C:\WINDOWS\Рабочий стол\123.rar

(в Image1 нужно отбразить иконку данного файла)


 
Song ©   (2002-04-24 13:39) [1]


IconIndex:=1; // Формат переменной Word
DrawIcon(Image1.BitMap.Canvas.Handle,10,10,ExtraxtAssociatedIcon(Handle,PChar(FileName),IconIndex));


 
KvORubin ©   (2002-04-24 14:48) [2]

А можно привести работающий пример ???
Немогу сообразить, что да как. :(


 
Song ©   (2002-04-24 15:10) [3]

procedure TForm1.Button1Click(Sender: TObject);
Var IconIndex:Word;
begin
IconIndex:=1;
DrawIcon(Image1.Canvas.Handle,10,10,ExtractAssociatedIcon(Hinstance,PChar(Application.ExeName),IconIndex));
end;



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

Текущий архив: 2002.05.09;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.009 c
1-26122
Mic_2k
2002-04-24 17:11
2002.05.09
Как можно прорисовать табличку в Excel из Delphi


3-26024
slc_g@yandex.ru
2002-04-16 14:21
2002.05.09
Мастера, как записать файл BMP в blob поле


14-26270
Donal_Graeme
2002-04-02 10:00
2002.05.09
Kylix


1-26164
Asphix
2002-04-25 11:06
2002.05.09
Memo :(


1-26062
Александр_30
2002-04-25 09:20
2002.05.09
получение значений массива из функции