تغییر آیکن فولدر

[dup_azad]

سلام
می خواستم آیکن یک فولدر رو از داخل برنامه عوض کنم
اگر کسی این کار رو انجام داده یا چیزی به ذهنش میرسه ممنون میشم منو راهنمایی کنه .

[dup_azad]

کسی در این زمینه کاری انجام نداده

[Hamid_PaK]

باید با یک TIniFile اطلاعات داخل فایل desktop.ini فولدر را تغییر دهید :


-=[ DESKTOP.INI Content ]=- {
[.ShellClassInfo]
IconFile=%SystemRoot%\system32\SHELL32.dll
IconIndex=130
}


section میشه ShellClassInfo. و IconFile میشه آدرس فایل آیکون و IconIndex می شه شماره آیکون.

یا حق ...

[dup_azad]

ممنون از پاسخگویتون ولی من می خواستم آِکن یک فولدر خاص رو تغییر بدم
در نوشته شما هیچ جا آدرس فولدر خاصی دیده نمیشه

[Hamid_PaK]

متن کد بالا هیچ ارتباطی به دلفی نداره اون تنها محتوای یک فایل desktop.ini است.
شما باید به این روش عمل کنید :


var
ini_file: TIniFile;
begin
//;
ini_file := TIniFile.Create('c:\a\desktop.ini');
try
ini_file.WriteString('.ShellClassInfo', 'IconFile', '%SystemRoot%\system32\SHELL32.dll');
ini_file.WriteString('.ShellClassInfo', 'IconIndex', '130');
SetFileAttributes('c:\a\desktop.ini', FILE_ATTRIBUTE_HIDDEN+FILE_ATTRIBUTE_SYSTEM);
SetFileAttributes('c:\a', FILE_ATTRIBUTE_READONLY);
finally
ini_file.Free;
end;
end;


یا حق ...