Hallo padavan,
vielleicht hilft dir diese kleine Funktion:
Delphi-Quellcode:
// uses Windows;
function ShortPathName(const fileName: string): String;
var
buf: array [0..MAX_PATH] of char;
begin
SetString(Result, buf, GetShortPathName(PAnsiChar(fileName), @buf, MAX_PATH));
end;
Dein Problem mit den Namen entsteht dadurch, dass du die leicht verständliche aber veraltete FileListBox verwendest. Und die Image Komponente merkt sich den Namen der Datei nicht, aus der du das Bild geladen hast. Das musst du selbst tun.
Grüße vom marabu