Sharing Datsource from form1 to form2?

holme...@netsrq.com (Shane Holmes)

Delphi Developer

Sun, 11 Oct 1998 03:00:00 GMT

Sharing Datsource from form1 to form2?

I was wondering if you could help me with this problem I am having
sharing a Datasource from Form1 in form2:

procedure form2.FormActivate(Sender: TObject);
var I: Integer;
begin
for I:= 0 to ComponentCount-1 do
if Components[I] is TDBedit then
begin
TDBEdit(Components[I]).DataSource:= Form1.DataSource1;
TDBEdit(Components[I]).DataField:= Form1.Table1.Fields[I].FieldName;
end;
end;

My problem is that there are other controls on the form other than
TDBedits. Like buttons and panels, and other TDBControls such as
TDBComboBox.

Would you know how to accomplish this sharing of the Datasource/Dataset
I just can't seem to figure this out.

Shane Holmes

mcssi

Delphi Developer

Wed, 14 Oct 1998 03:00:00 GMT

Re:Sharing Datsource from form1 to form2?

Did you try using the Data Module ?? (if you have Delphi 2, that is)

keith

Quote

holme...@netsrq.com (Shane Holmes) wrote:
>I was wondering if you could help me with this problem I am having
>sharing a Datasource from Form1 in form2:
>procedure form2.FormActivate(Sender: TObject);
>var I: Integer;
>begin
> for I:= 0 to ComponentCount-1 do
> if Components[I] is TDBedit then
> begin
> TDBEdit(Components[I]).DataSource:= Form1.DataSource1;
> TDBEdit(Components[I]).DataField:= Form1.Table1.Fields[I].FieldName;
> end;
>end;
>My problem is that there are other controls on the form other than
>TDBedits. Like buttons and panels, and other TDBControls such as
>TDBComboBox.
>Would you know how to accomplish this sharing of the Datasource/Dataset
>I just can't seem to figure this out.
>Shane Holmes

KJumo

Delphi Developer

Mon, 26 Oct 1998 03:00:00 GMT

Re:Sharing Datsource from form1 to form2?

Someone has produced a Datasource component which can be shared by forms
on the Delphi Super Page - Shareware. I haven't tested it, but you could
try it.

Other Threads

1. Sharing Datasource from form1 to form2?

2. How form2 can inform form1 to delete form2 ?

3. What can I do to call from Form1, Form2 and from Form2, Form1?

4. Frustrated: Trying fsStayOnTop for form2 as form1 opens

5. How to connect DBMemo on Form2 to TDataSource on Form1

6. Form1, Form2, Form3

7. Newbie HELP: getting Form1 data in Form2?

8. Form1 & Form2

9. keeping form2 atop form1 -- but not Topmost

10. Drag & Drop from Form1 to Form2