Source position: dbctrls.pp line 1293
procedure ChangeDataSource(
AControl: TControl;
Link: TDataLink;
NewDataSource: TDataSource
);