While schleife endlos? oder nicht?

[Chemiker]

Hallo JumpFrog,

randomize musst Du nicht verstehen nur mit F1 die Funktionsweise nachsehen.

Des Weiteren macht es sich gut Variable mit einem definierten Zustand einzusetzen.

Delphi-Quellcode:

procedure TfrmLotto.FormCreate(Sender: TObject);
var
  i: integer;
begin
  randomize;
  for I := 0 to high(Feld) do
  begin
    Feld[i]:= 0;   
  end; 
end;

Bis bald Chemiker