一般情况下, 数据源相关控件应该有数据模块中统一管理, 这也方便其他窗体调用; UserSessionUnit 就是一个现成的数据模块.
现在把数据源相关控件放在 UserSessionUnit 的窗体上:
FDPhysSQLiteDriverLink1: TFDPhysSQLiteDriverLink;FDGUIxWaitCursor1: TFDGUIxWaitCursor;FDConnection1: TFDConnection;DataSource1: TDataSource;FDTable1: TFDTable;
并在其 OnCreate 事件中写代码:
procedure TIWUserSession.IWUserSessionBaseCreate(Sender: TObject);begin FDTable1.Connection := FDConnection�ڰײ���,�ƶ