Добавлено: 15 апр 2004, 03:40
Что именно вызывает затруднения? Форму из DLL уже удается проинициализировать и запустить?
В основной программе должны быть кнопки ButtonDelete, ButtonNew, ButtonEdit
В обработчике OnButtonDeleteClick делаем: DBGrid1.Datasource.Dataset.Delete;
В обработчике OnButtonNewClick делаем:
В обработчике OnButtonEditClick делаем:
FormFromDLL - это переменная в которой ссылка на инстанс формы из DLL.
После созданиия формы прикрепляем ее DBAware-контролы к источнику данных грида:
FormFromDLL.DBEdit1.DataSource:=DBGrid1.DataSource;
В DLL: В обработчике OnButton1Click надо просто закрыть модальное окно:
ModalResult:=mrOk;
Предварительно проверив правильность ввода данных, например. А то и вовсе ничего не делать на ее нажатие, а только свойство ModalResult кнопки установть в mrOk;
В основной программе должны быть кнопки ButtonDelete, ButtonNew, ButtonEdit
В обработчике OnButtonDeleteClick делаем: DBGrid1.Datasource.Dataset.Delete;
В обработчике OnButtonNewClick делаем:
Код: Выделить всё
with DBGrid1.Datasource.Dataset do begin
Insert;
if FormFromDLL.ShowModal=mrOK then Post else Cancel;
end;
Код: Выделить всё
with DBGrid1.Datasource.Dataset do begin
Edit;
if FormFromDLL.ShowModal=mrOK then Post else Cancel;
end;
FormFromDLL - это переменная в которой ссылка на инстанс формы из DLL.
После созданиия формы прикрепляем ее DBAware-контролы к источнику данных грида:
FormFromDLL.DBEdit1.DataSource:=DBGrid1.DataSource;
В DLL: В обработчике OnButton1Click надо просто закрыть модальное окно:
ModalResult:=mrOk;
Предварительно проверив правильность ввода данных, например. А то и вовсе ничего не делать на ее нажатие, а только свойство ModalResult кнопки установть в mrOk;
