StringGrid

← →
Марат (2004-03-23 05:49) [0]

Привет мастера! Вопрос такой: как в StringGrid сделать так, чтобы можно было бы набирать только цифры и не больше 5 символов?
Пробовал через свойство OnGetEditMask, но не хватило "тямы".

← →
Яичница © (2004-03-23 07:00) [1]

procedure TForm1.StringGrid2GetEditMask(Sender: TObject; ACol,
ARow: Integer; var Value: String);
begin
Value := "99999";
end;

OnGetEditMask does not occur unless the Options property includes goEditing. - не забудь включить эту опцию.

+ F1 на TEditMask -)

В OnKeyPress пиши
if (not (key in ["0".."9"])) or (length(cells[col,row])=5) then key:=#0;

StringGrid Найти похожие ветки