Автор: Bill Curtis (Borland International)
Мне необходимо как-то предотвратить автоматическое добавление записей в
таблицу. Может быть предусмотреть какую-то хитрость для создания новой записи в
табличной сетке?
Попробуй это (я правда оставил некоторый мусор после испытаний кодов клавиш).
Для DBGridkeydown используй:
begin s := 'ASCII код клавиши ' + IntToStr(Ord(key)) + ' десятичное'; { showmessage(s); } s :=IntToStr(Ord(key)); end;
|
И затем в TTable сделайте следующее:
begin if s<>'45' then raise Eabort.create(''); s:=''; end;
|
Естественно, "s" должна быть объявлена глобально. |