Ergebnis der Suchanfrage

• Forum: Multimedia

  Re: Schiffe versenken

    Delphi
    by Sir Rufo, 24. Feb 2010
  procedure TForm1.button_startClick(Sender: TObject);
  var
  SchiffLaenge : integer;
  SchiffPosX, SchiffPosY : integer;
  SchiffHoch : boolean; // True = Hochkant; False = Waagerecht
  begin
  
  for SchiffLaenge := 1 to 5 do
  begin
• Forum: Multimedia

  Re: Schiffe versenken

    Delphi
    by Sir Rufo, 24. Feb 2010
  Die Funktionen werden zum gleichen Zeitpunkt ausgeführt, wie in deinem bisherigen Programm.
  Diese werden doch innerhalb dieser Procedure aufgerufen:
  procedure TForm1.button_startClick(Sender: TObject);
  
  Randomize
• Forum: Multimedia

  Re: Schiffe versenken

    Delphi
    by Sir Rufo, 23. Feb 2010
  Hallo kk
  
  ich hätte da einige Tipps:
  
  1. Randomize
  
  sollte nur einmal pro Application aufgerufen werden.
  Entgegen der weit verbreiteten Meinung, dieses gehöre in die Create-Methode der Form,
  empfehle ich den Befehl in der dpr-Datei aufzurufen:
  program Test1;