Помогите решить проблему с MDI приложением

← →
Mad Diger (2002-11-26 18:04) [0]

Проблема такая есть очень большое количество MDICild есть свои компоненты, и нужно восплоьзоваться функциями компонент явно не обявляя форму где она лежит выходит только с явным обявлением:

if (Form1.ActiveMDIChild is tform7) then begin
with tform7(Form1.ActiveMDIChild) do begin
ADODataSet1.Locate(fn,form8.edit1.Text,[loPartialKey]);
end;
end;

можно ли сделать что-то наподобие

with Form1.ActiveMDIChild do begin
ADODataSet1.Locate(fn,form8.edit1.Text,[loPartialKey]);
end;
т.е. воспользоваться ADODataSet1 активной MDIChild формы.
Зарание благодарен.

← →
Юрий Федоров © (2002-11-26 18:35) [1]

Наследование для Child форм нужно вводить, ADODataSet1 поместить в общего предка и типизировать под него, (если конечно ВСЕ child"ы от него отнаследованы

Помогите решить проблему с MDI приложением Найти похожие ветки