Module的正确使用方法是什么?最好有个简单的例子。或详细的步骤,一个程序中一般Module只有一个吗?
还是根据什么的状况动态创建?为什么需要多个?
我使用Module的问题是,在主窗口连上Module后,进行查询,没有相应的数据集出现在DBGrid
应该有连上ADOConnection 我把Login设置为TRUE时,有登陆提示
还是根据什么的状况动态创建?为什么需要多个?
我使用Module的问题是,在主窗口连上Module后,进行查询,没有相应的数据集出现在DBGrid
应该有连上ADOConnection 我把Login设置为TRUE时,有登陆提示
检查DBGRID是否设置对应的DataSource,以及DataSet是否打开
下面这样用DBGrid就不会显示数据,不知道怎么回事
unit Unit2;interfaceuses
SysUtils, Classes, DB, ADODB;type
TDataModule2 = class(TDataModule)
ADOConnection1: TADOConnection;
ADOQuery1: TADOQuery;
procedure DataModuleCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
DataModule2: TDataModule2;implementation{$R *.dfm}procedure TDataModule2.DataModuleCreate(Sender: TObject);
begin
DataModule2.ADOConnection1.ConnectionString:='Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=CS' ;
end;end.
unit Unit1;interfaceuses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Grids, DBGrids, DB;type
TForm1 = class(TForm)
DataSource1: TDataSource;
DBGrid1: TDBGrid;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementationuses Unit2;{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);
begin
DataModule2.ADOQuery1.Close;
DataModule2.ADOQuery1.SQL.Clear;
DataModule2.ADOQuery1.SQL.Text:='select * from Operator';
DataModule2.ADOQuery1.Close;end;end.
2.确定DBGrid1连了DataSource1.3:procedure TForm1.FormCreate(Sender: TObject);
begin
DataModule2.ADOQuery1.Close;
DataModule2.ADOQuery1.SQL.Clear;
DataModule2.ADOQuery1.SQL.Text:='select * from Operator';
DataModule2.ADOQuery1.Close; {-----这里是DataModule2.ADOQuery1.open吧??,最后关闭了,又如何会显示数据}end;