Главная страница
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.012 c
4-26287
ted
2002-03-06 13:33
2002.05.09
Как получить IP адрес???


1-26071
KvORubin
2002-04-23 18:53
2002.05.09
Проблемы с КОДИРОВКОЙ текста !!! - как изменить её ???


1-26117
vlv
2002-04-24 14:37
2002.05.09
Обработка нажатия клавиш


14-26261
Владислав
2002-04-02 18:56
2002.05.09
Проблема с Borland C++ Builder 5.


4-26293
Ted
2002-03-06 09:57
2002.05.09
Помогите, плиз.......отключить локальные винты