[Михалыч]

Как сделать так, чтобы после того, как пользователь ввел запятую, после нее он смог бы ввести только не более двух знаков.
P/S/ Под знаками понимаются числа.

[Михалыч]

Как сделать так, чтобы после того, как пользователь ввел запятую, после нее он смог бы ввести только не более двух знаков.
P/S/ Под знаками понимаются числа.

[M.A.D.M.A.N.]

Код:

procedure TEdit.OnKeyPress(Sender:TObject; var Key:Char);
begin
  if Key=',' then Edit.MaxLength:=Length(Edit.text)+2;
end;