Карта сайтаСсылкиКонтакты

Получение значения в TDBGrid прежде, чем они будут сохранены в базе данных

PDF Печать
Статьи

Вы можете видеть, что печатается в TDBGrid, смотря на управление TInPlaceEditor. Должна быть предпринята осторожность, Вы должны удостовериться, что управление TInPlaceEdit создано перед попыткой использовать его.

Сдедующая функция покажет данные в столбце сетки, которая редактируется.


procedure TForm1.DBGrid1KeyUp(Sender: TObject;
               var Key: Word; Shift: TShiftState);
var
  B: byte;

begin
  for B := 0 to DBGrid1.ControlCount - 1 do
  if DBGrid1.Controls[B] is TInPlaceEdit then
  begin
    with DBGrid1.Controls[B] as TInPlaceEdit do
    begin
      Label1.Caption := 'Text = ' + Text;
    end;
  end;
end;

Смотрите в справочном файле относительно TInPlaceEdit для получения дополнительной информации.


 

Добавить комментарий


Защитный код
Обновить