Скачать: CL | DM;

Диалоговое окно замены иконки   Найти похожие ветки 

← →
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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.015 c