Hi Klaus01
LDeskIniPath wird in der aufrufenden Prozedur initialisiert:
Delphi-Quellcode:
LDeskIniPath := MainPage.ProjectPath + 'desctop.ini';
ShowMessage('LDeskIniPath := ' + LDeskIniPath +sLineBreak+
'LDeskIniPath := ' + ExtractFilePath(LDeskIniPath) +sLineBreak+
'**************************************');
LBmpFile:= LDeskIniPath + 'desctop.bmp';
LBitmap.SaveToFile(LBmpFile);
LiconIndex := 0;
ChangeFolderIcon(LDeskIniPath, LBmpFile, LiconIndex);
Gruss
Delbor