Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.12.02;
Скачать: [xml.tar.bz2];

Вниз

Иконки   Найти похожие ветки 

 
Ag2002   (2002-11-20 18:45) [0]

Подскажите как можно извлеч иконку из чужой проги ???
Дайте пример если возможно ! Спасибо !!!


 
Skolotovich   (2002-11-20 19:33) [1]

любой редактор ресурсов


 
Poirot   (2002-11-20 20:42) [2]

Мона типа ExtractFileIcon что-то типа
или мона юзая под NT функции типа FindResource, Lockresource и т.д.


 
Ag2002   (2002-11-21 10:42) [3]

нет мне нужно програмно !!!
Дайтие пример как !!!


 
stone   (2002-11-21 10:49) [4]

в Delphi\Demos есть пример Resourse Explorer


 
Ag2002   (2002-11-21 11:08) [5]

stone © там очень трудновато,
нет ли у кого конкретно примера извлечения главной иконки из файла !!!!


 
Song   (2002-11-21 11:16) [6]

Конкретный пример будет страниц на 5, если не больше, потому что MS ничего готового не сделала для этой функции. (или может я не в курсе).


 
Крот   (2002-11-21 11:27) [7]

ExtractAssociatedIcon извлекает иконку, сязанную с типом файла
ExtractIcon извлекает все иконки, содержащиеся в *.exe или *.dll


 
Song   (2002-11-21 11:30) [8]

2Крот © (21.11.02 11:27)
Имелось ввиду из ресурса. Хотя может я и не правильно понял.


 
mukha   (2002-11-22 11:20) [9]

из моей проги:
на форме находится TImage. В него и вытаскиваю иконку из EXE-файла. Если надо из другого EXE, то пропиши полный путь к нему. Ну а из TImage иконку сохранишь, если надо.

procedure TForm12.FormCreate(Sender: TObject);
var IconIndex : word;
h : hIcon;
begin
IconIndex := 0;
h :=ExtractAssociatedIcon(hInstance,"Archives.EXE",IconINdex);
DrawIcon(Image1.Canvas.Handle,1,1,h);
end;



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

Форум: "Основная";
Текущий архив: 2002.12.02;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.008 c
14-4593
Дмитрий К.К.
2002-11-12 08:12
2002.12.02
Посоветуйте клавиатурного шпиЁна... плиз...


4-4658
xyz
2002-10-16 23:21
2002.12.02
Пример Хука на окошко...


1-4479
Павел
2002-11-20 16:22
2002.12.02
Работа с файлами


1-4497
AndrewVolkov
2002-11-20 20:49
2002.12.02
Как сделать, чтобы объявленный тип был виден из другого юнита???


1-4325
bkv
2002-11-21 16:05
2002.12.02
Ошибка при компиляци





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский