![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
dBase
vlad2 © (2002-03-04 09:29:00)Здравствуйте !
Подскажите, пожалуйста, как запретить дабовление новых
записей в таблицу, отображаемую с помощью TDBGrid. Кратко
о среде: SQL Server, ADO, Delphi. С уважением, Vlad.
JibSkeart (2002-03-13 16:34:00) [1]Нуу можно еще и пермишенцы выстовлять :))
Alexandr (2002-03-13 13:58:00) [2]на этом форуме благодарности рассылаются авторам в виде пива по e-mail
Vlad2 (2002-03-13 13:56:00) [3]Я впервые на форуме, и не знаю, куда
посылать благодарности. Всем спасибо.
И желаю удачи.
Lusha (2002-03-04 14:42:00) [4]А если необходимо при этом иметь возможность вставки записей в DataSet тогда лучше так:
procedure TForm1.DBGrid1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_INSERT then
Key := 0;
if Key = VK_DOWN then
begin
TDBGrid(Sender).DataSource.DataSet.Next;
Key := 0;
end;
if Key = VK_UP then
begin
TDBGrid(Sender).DataSource.DataSet.Prior;
Key := 0
end;
end;
Nest (2002-03-04 13:19:00) [5]vlad2
Если нужно именно
"запретить дабовление новых записей в таблицу, отображаемую с помощью TDBGrid" но оставить возможность, например редактирования существующих записей, тогда просто редонли не подойдёт-
надо :
procedure TForm1.Table1BeforeInsert(DataSet: TDataSet);
begin
abort;
end;
Turalyon (2002-03-04 10:14:00) [6]TBDGrid1.ReadOnly := True;