Одной строкой

Предохранение от автодобавления записи

Мне необходимо как-то предотвратить автоматическое добавление записей в таблицу. Может быть предусмотреть какую-то хитрость для создания новой записи в табличной сетке?

Попробуй это (я правда оставил некоторый мусор после испытаний кодов клавиш). Для 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]