DBGRID特定列入力制限

解決

たこ  2018-04-13 16:45:14  No: 49123  IP: 192.*.*.*

DBGRIDに入力する時に例えば入力対象のColumnsのインデックスが5の時には0か1に限定したいのですがどのようにすればいいでしょうか？

編集 削除
たこ  2018-04-16 09:51:29  No: 49124  IP: 192.*.*.*

自己レスです。
検索したところ下記にて対応しました。
procedure TForm1.DBGrid1KeyPress(Sender: TObject; var Key: Char);
var
  AcceptStr: string;
begin
  if DBGrid1.SelectedField.FieldName = 'TEST' then
  begin
    AcceptStr := '01';
    if (Pos(Key,AcceptStr)=0) and (Ord(Key) <> VK_BACK) then
      Key := #00
    else
      Key := Key;
  end;
end;

編集 削除
たこ  2018-04-16 09:52:12  No: 49125  IP: 192.*.*.*

解決です。

編集 削除