Форум: "Основная";
Текущий архив: 2003.03.20;
Скачать: [xml.tar.bz2];
ВнизДиалоговое окно замены иконки Найти похожие ветки
← →
spROOT13 (2003-03-09 15:00) [0]Здравствуйте, Мастера!
Вопрос такой:
Как вызвать стандартное окно выбора иконки(такое как в свойствах ярлыка)?
И чтобы после нажатия кнопки OK , путь к выбранному значку
записывался в какую-нибудь переменную.
Заранее спасибо!
← →
spROOT13 (2003-03-09 15:23) [1]Что никто не знает? Может компонент какой посоветуете?
← →
Song (2003-03-09 17:41) [2]Function SHChangeIconDialog(hOwner:THandle;szFilename:AnsiString;
Reserved:Integer;var lpIconIndex:integer):dword;stdcall;
external "shell32.dll" index 62;
procedure TForm1.Button1Click(Sender: TObject);
var fMame:AnsiString;IconIndex:integer{пустой?};
begin
fMame:="shell32.dll";
SHChangeIconDialog(form1.Handle,fMame,0,IconIndex);
end;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.03.20;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.006 c