
Zitat von
Hansa:
Ich will die Eingaben abfangen, wie ist mir egal. Das mit dem EditMask geht im Moment noch nicht, wer hat Beispiel?
OH gibt nicht viel her.
Delphi-Quellcode:
procedure TForm1.StringGrid1GetEditMask(Sender: TObject; ACol,
ARow: Integer; var Value: String);
begin
case acol of
1 : Value := '9999;0; '; //maximal vierstellige zahl erlaubn
2 : Value := '99999999;0; '; //maximal achtstellige zahl
3 : Value := '99999999;0;_'; //maximal achtstellige zahl, leerzeichen als _ darstellen
else
Value := ''; //alles erlauben
end; //of case
end;
in der
OH:
Teditmask heißt das Zauberwort und viel einfach ausprobieren