Мне необходимо как-то предотвратить автоматическое добавление записей в таблицу. Может быть предусмотреть какую-то хитрость для создания новой записи в табличной сетке?
Попробуй это (я правда оставил некоторый мусор после испытаний кодов клавиш). Для 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" должна быть объявлена глобально.
Bill Curtis
Borland International
[000378]