Prüfen welches bild gerade in TImage angezeigt wird.

[NickelM]

Ich würde auch einfach eine Variable in der Unit deklarieren :

Delphi-Quellcode:

//bei der unit
var
Filename : String;

// bei der procedure oder function 

begin
Filename := 'a.jpg'
Image1.Picture.LoadFromFile(Filename);
//natürlich vor dem Filename der Pfad

end;