![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Dbgrid-проверка на заполнение [D6, D7]
Filmax © (2003-03-31 14:45:00)Народ, как проверить, что все ячейки в DBgrid (их ограниченное количество) заполнены, и чтобы фокус переходил на первую незаполненую ячейку! Спасибо!
Mike Kouzmine (2003-03-31 15:35:00) [1]if DBGrid.Columns[I].Field.isNull then
Mike Kouzmine (2003-03-31 15:22:00) [2]if Key = VK_Return then
begin
Ok := True;
for I := 0 to DBGrid.ColumnsCount - 1 do
begin
if DBGrid.Columns.Field.isNull then
begin
DBGrid.SelectedIndex := I;
Ok := False;
Break;
end;
end;
if Ok then //Сохраняем.
Key := 0;
end;