Mit Arrays rechnen

[Mysterio08]

Zitat von mkinzler:

Z.B. im KeyDown- oder KeyPress-Event

Also ich hab das jetzt mal versucht, schaffe es aber nicht. Folgendes habe ich geschrieben:

Delphi-Quellcode:

procedure TForm1.StringGridKeyPress(Sender: TObject; var Key: Char);
var
  i: Byte;
begin
  for i := 1 to Max do //Max = 12
    begin
      StringGrid.Cells[2,i] := Chr(27)  //Chr27 ist die ESC-Tase
    end;
end;

So habe ich es immer bei Edit-Felder gemacht, wenn ich nicht wollte, dass der Nutzer z.B. ein Ergebnis manipulieren kann (ich weiß, ein Label bietet sich zur Ausgabe eher an, aber in der Schule werden wir "gezwungen" ein Edit-Feld zu nehmen).
Jetzt ist das Problem, dass ich in den Felder 1 bis 12 soche Vierecke habe (ich hoffe ihr wisst, was ich damit meine).
Könnt ihr mir einen anderen Lösungsweg nennen, denn ich weiß nicht weiter!

[jaenicke]

Zitat von Mysterio08:

Jetzt ist das Problem, dass ich in den Felder 1 bis 12 soche Vierecke habe (ich hoffe ihr wisst, was ich damit meine).

Du schreibst ja auch das Zeichen Escape, Chr(27) nämlich, in das StringGrid.
Was erwartest du denn anderes als dass das Zeichen dann dort angezeigt wird? Da es kein normales Zeichen ist, sieht man eben nur solch ein Ersatzzeichen.

[Namenloser]

Zitat von Mysterio08:

Zitat von mkinzler:

Z.B. im KeyDown- oder KeyPress-Event

Also ich hab das jetzt mal versucht, schaffe es aber nicht. Folgendes habe ich geschrieben:

Delphi-Quellcode:

procedure TForm1.StringGridKeyPress(Sender: TObject; var Key: Char);
var
  i: Byte;
begin
  for i := 1 to Max do //Max = 12
    begin
      StringGrid.Cells[2,i] := Chr(27)  //Chr27 ist die ESC-Tase
    end;
end;

So habe ich es immer bei Edit-Felder gemacht, wenn ich nicht wollte, dass der Nutzer z.B. ein Ergebnis manipulieren kann (ich weiß, ein Label bietet sich zur Ausgabe eher an, aber in der Schule werden wir "gezwungen" ein Edit-Feld zu nehmen).
Jetzt ist das Problem, dass ich in den Felder 1 bis 12 soche Vierecke habe (ich hoffe ihr wisst, was ich damit meine).
Könnt ihr mir einen anderen Lösungsweg nennen, denn ich weiß nicht weiter!

StringGrid.Options := StringGrid.Options - [goEditing] Oder im Objektinspektor einstellen.

Btw: Bei Edits würde ich nicht unbedingt Chr(27) nehmen, sondern #0.