Das sicherste und Schnellste wäre dein Weg zwar.
Der einfche Weg wurde gleich zu Anfang genannt
TImage(FindComponent('Image' + IntoStr(i))).LoadFromFile
und wie die Fehlermeldung dir sagen sollte, sind da nur Kostanten erlaubt und ExtractFilePath, sowie ParamStr sind ja wohl Funktionen
Delphi-Quellcode:
procedure ShowPicture(aImages: array of TImage; aPath: String = '');
var
i : Integer;
begin
if aPath = '' then aPath := ExtractFilePath(ParamStr(0)) + 'Test.jpg;
for i := 0 to High(aImages) do
aImages[i].Picture.LoadFromFile := aPath;
end;