maskEdit - nur zwei buchstaben an einer stelle

[Sharky]

Hai mickmack,

dafür würde ich das OnKeypress-Ereigniss verwenden.

Delphi-Quellcode:

procedure TForm1.StringGrid1KeyPress(Sender: TObject; var Key: Char);
var
  sg : TStringGrid;
begin
  sg := TStringGrid(Sender);
  if sg.Col = 2 then  // Nur die Zeile 2 prüfen.
  begin
    if not (Key in ['j','n',#8]) then Key  := #0;
    if Length (sg.Cells[sg.Col,sg.row]) = 1 then Key := #0;
  end;
end;