Stringgrid - Zahlen verbieten

[czernobill86]

hallo,

wie kann man bei einem StringGrid in der ersten Spalte Zahlen und Buchstaben einzutragen zulassen, aber in der übrigen Spalten nur Zahlen und keine Buchstaben?

ich bin bis jetzt soweit:

Delphi-Quellcode:

procedure TForm1.sg1KeyPress(Sender: TObject; var Key: Char);
begin
  if NOT (Key in [',','.',#08, '0'..'9']) then
    Key := #0;
end;

Aber das verbietet ja Buchstaben im ganzen StringGrid.

Weiß jemand wie das geht?

[Poolspieler]

Hi,
mit der eigenschaft "col" und "row" kannst Du abfragen, in welcher Spalte/Reihe Du Dich gerade befindest und entsprechend reagieren...

Gruß und noch viel Spaß,
Poolspieler

[czernobill86]

danke, es geht!

[Grishnak]

btw: dein Code schützt nicht gegen Copy&Paste!

[czernobill86]

hm stimmt.

[-=wWw=- AK23]

hat die komponente rein zufällig eine "OnChange" funktion?

[Poolspieler]

Nein,
OnChange gibt es nicht, aber
OnSetEditText

--> hier könnte man dann den enthaltenen Text der aktuellen Zelle untersuchen und gegebenenfalls reagieren.

Gruß,
Poolspieler

[BunnyX]

Hi,
also das mit nur Zahlen im Stringgrid habe ich ja verstanden. Aber jetzt kommt´s.
Wie kann ich überhaupt etwas in das Stringgrid eintragen? Ich möchte es nicht über ein Editfeld machen und einen Button der dann die Zahlen in das Stringgrid schickt(so haben wir es immer in der Schule gemacht), sondern einfach nur eine zelle im Stringgrid anklicken --> Zahl drücken --> Zahl erscheint???

[marabu]

Guten Morgen,

sobald du die Option goEditing des Grids eingeschaltet hast, wirst du Zellen interaktiv bearbeiten können.

Grüße vom marabu

[BunnyX]

He 1000 Dank, war ja wirklich ne einfache Sache :)
Danke