如何判断有多少个组件与DataSource相联?

Question

如何判断有多少个组件与DataSource相联?是DataSource.ComponentCount吗?

Answer 1

for i:=0 to self.ComponentCount -1 do
if (Self.Components[i] is TDBEDit) or (Self.Components[i] is TDBMemo) or ... then
  if ((Self.Components[i] as TDBEdit).DataSource.Name<>'') or (((Self.Components[i] as TDBMemo).DataSource.Name<>'')) or ... then
    inc(j);//只要所联接DataSource不为空则表示，如果想判断多少控件联接某一个DataSource,可以判断 Datasouce.name='datasource1'