Zeitverzögerung bei der Anzeige im Stringgrid

[draxo]

Hallo,

ich möchte es realisieren, dass eine Zeitverzögerte Eingabe/Anzeige in einem Stringgrid erfolgt.

Ich hatte mir das wie folgt gedacht:

Delphi-Quellcode:

procedure TFrmMain.BtnStartClick(Sender: TObject);
var
  I: Integer;
  J: Integer;
begin

  for I := 0 to 7 do
  begin
    for J := 0 to 1 do
    begin
      sleep(500);
      StrGrdSpielfeld.Cells[I,J]:='6';
    end;
  end;
end;

Der Sleep-Befehl funktioniert auch. Das Problem dabei ist, dass nur der komplette Inhalt nach einer gewissen Zeit komplett angezeigt wird, aber nicht jeder Eintrag nacheinander.

Wie kann man es erreichen, dass eine Zelle nach der anderen geschrieben/dargestellt wird.

[ConstantGardener]

Hallo Draxo,

füge ein

 Application.ProcessMessages in die Schleife ein. Das veranlasst Windows das Grid jedesmal neu zu Zeichnen/aktualisieren. Aber Achtung: Deine Buttons und andere Bedienelemente nehmen dann auch Befehle (Clicks usw.) an. Also am besten sperren !!