I want to bind all edit fields on a form to a dataset on another form.

Instead of using this  - (this is working correct):

edit1.dataset:=form1.L_Gebruikers;
edit2.dataset:=form1.L_Gebruikers;
......

But in order to not forget an edit field I would like to use the following:

for i := 0 to FrmMijnGegevens.ComponentCount - 1 do
   begin
   if (Component[i] is TEdit) then
      begin
      Component[i].DataSet:=form1.L_Gebruikers;
      end;
   end;


See error herby enclosed.

Paul.

I think you have to cast to make the assignment :
      TEdit(Component[i]).DataSet:=form1.L_Gebruikers;

(not tested).

That's it !  Thanks.


squiffy wrote:


I think you have to cast to make the assignment :
      TEdit(Component[i]).DataSet:=form1.L_Gebruikers;

(not tested).