Spielfeld aus Textdatei laden

[Nikolas]

Ich hab mal den Text aus nem Edit genommen und dann in Farbflächen umgewandelt:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
i: integer;
x,str: string;
begin
str:=edit1.Text;
for i:=0 to length(str) do
begin
x:=copy(str,i,1);

        with form1.Canvas do
        begin
        if X= '1' then brush.Color:=clred;
        if X= '2' then brush.Color:=clgreen;
        FillRect(rect((i-1)*50,0,i*50,50));
        end;

end;

Anstelle der Rechtecke könntest du dann images entstehen lassen und dann mit dem Bild deiner Wahl anmalen. (Zum Lesen aus der Datei: assignfile, reset, readln, closefile)

Ich versteh deinen Code leider auch nicht , aber so kannst du es auch machen.