Thema: Delphi Schiffe versenken

Einzelnen Beitrag anzeigen

Newcomer91

Registriert seit: 9. Mär 2010
66 Beiträge
 
Delphi 2010 Professional
 
#1

Schiffe versenken

  Alt 10. Mär 2010, 08:47
Guten morgen, ich habe eine Frage

also ich programmiere gerade ein schiffeversenken. Ich bin echt noch anfänger und hab öfters kleine Wissenslücken.
Meine Frage jetzt im moment wäre erstmal wie und genau wo setze ich die For - Schleife?
Delphi-Quellcode:
unit Schiffe;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Grids;

type
  TfrmSchiffe = class(TForm)
    StringGridSpielfeld: TStringGrid;
    procedure FormCreate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

const COLS = 10;
      ROWS = 10;

var
  frmSchiffe: TfrmSchiffe;
  SpielfeldIntern :array[1..COLS, 1..ROWS] of integer;

implementation

{$R *.dfm}

procedure TfrmSchiffe.FormCreate(Sender: TObject);
begin

  StringgridSpielfeld.ColCount:=COLS;
  StringgridSpielfeld.RowCount:=ROWS;


end;

end.
Danke im Vorraus

Newcomer91

EDIT:

Habs schon...^^ muss jetzt die Schiffe generieren da wäre meine Frage wie mach ich das?

ty @
  Mit Zitat antworten Zitat