Форум: "Базы";
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];

Вниз

DBEdit в фокусе   Найти похожие ветки 

← →
panov   (2001-12-18 10:11) [4]

В public-секцию формы введи
public
...
tmpDS: TDataSet;
...

В OnPopupMenu устанавливай
if (PopupMenu.PopupComponent is TDBEdit)
then
tmpDS := TDBEdit(PopupMenu.PopupComponent).DataSource.Dataset
else
tmpDS := nil;

После выбора значения в другом окне c TDBGrid
выполни:
...
tmpDS.Edit;
tmpDS.FieldByName(поле1).As... :=
DBGrid.DataSource.DataSet.FieldByName("поле2").As...;
tmpDS.Post;

Примерно такой порядок действий

---

Страницы: 1 вся ветка

Форум: "Базы";
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.004 c