TPicture-Array per for-to-do-Schleife füllen < zu blöd :(

[omata]

Zitat von Qnkel:

...stürzt es mit na Fehlermeldung in der picture.inc ab.

Wie lautet die Fehlermeldung?

Und ein Schluss ins blaue...

Delphi-Quellcode:

var
  Kartenblatt: array[0..31] of TPicture;
 
function Kartenladen(Pfad, Typ: string): Boolean;
var i: integer;
begin
  Result := True;
  for i:=0 to 31 do
    begin
      ShowMessage(Pfad + '\' + IntToStr(i) + '.' + Typ);
      Kartenblatt[i]:=TPicture.Create;
      If FileExists(Pfad + '\' + IntToStr(i) + '.' + Typ) then
        Kartenblatt[i].PNG.LoadFromFile(Pfad + '\' + IntToStr(i) + '.' + Typ)
      Else
        Result := False;
    end;
end;