Form Maximieren - Komponente Align := alClient

[citybreaker]

Um genau zu sein ist es gar kein Image was dort rein kommt.
Sondern ein Array.

Delphi-Quellcode:

procedure TGameFrm.CreateMap;
var x, y,
    x1, y1: integer;
begin
  Spielfeld.Align := alClient;
  for x := 0 to 50 do
    for y := 0 to 50 do begin
      Map[x,y] := 0;
      if Map[x,y] = 0 then
        Spielfeld.Canvas.Draw (x*32, y*32, Wasser.Picture.Bitmap);
    end;
  for x1 := 1 to 20 do
    for y1 := 1 to 2 do begin
      Map[x1, y1] := 1;
      if Map[x1,y1] = 1 then
        Spielfeld.Canvas.Draw(x1*32, y1*32, Gras.Picture.Bitmap);
    end;
end;