Советы по Delphi

         

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


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

Попробуй это (я правда оставил некоторый мусор после испытаний кодов клавиш). Для DBGridkeydown используй:

    begin
s := 'ASCII код клавиши ' + IntToStr(Ord(key)) +
' десятичное'; {showmessage(s);}
s :=IntToStr(Ord(key));
end;

И затем в TTable сделайте следующее:



    begin
if

s<&gt'45' then
raise
Eabort.create('');
s:='';
end;

Естественно, "s" должна быть объявлена глобально.

Bill Curtis
Borland International [000378]



Содержание раздела