Как сделать при вводе в DBGrid только заглавными буквами?

← →
Roki (2003-03-06 12:41) [0]

Такой код не рабоатет:
procedure TfMain.gridKeyPress(Sender: TObject; var Key: Char); begin Key := Char(AnsiUpperCase(Key)); end;
пишет ошибку : invalid typecast

← →
Anatoly Podgoretsky © (2003-03-06 12:46) [1]

А посмори в хелпе входные и выходные параметры и тип переменной Key.

← →
icWasya © (2003-03-06 12:49) [2]

procedure TfMain.gridKeyPress(Sender: TObject; var Key: Char); begin Key := AnsiUpperCase(Key)[1]; end;

← →
Roki (2003-03-06 12:50) [3]

Я уже пробывал и
Key := Char(AnsiUpperCase(String(Key)));
и
Key := AnsiUpperCase(String(Key));
Выдает ошибку
Incompatible types: "Char" and "String"
Что я не так делаю?

← →
Roki (2003-03-06 12:53) [4]

Как сделать при вводе в DBGrid только заглавными буквами? Найти похожие ветки