各位高手，在中间层进行数据库读写操作，执行adoquery时报错，不能open，请问为什么？(100分)

unit FormMain;
interface
uses
SysUtils, Classes, Forms, Controls, StdCtrls;
type
TForm1 = class(TForm)
Label1: TLabel;
Label2: TLabel;
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
Edit4: TEdit;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
implementation
uses SockApp,DMLarNet;
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
LarNetDM.qrySupply.Close;
LarNetDM.qrySupply.SQL.Clear;
LarNetDM.qrySupply.SQl.Add('select * from Tab_FASP_Suggestion');
LarNetDM.qrySupply.open;
end;
这是在中间层的代码！
执行时连LarNetDM.qrySupply.Close;都不让执行！难道中间层不允许数据库操作！请教高人指点！

可以，报什么错?

Project LarnetServer.exe raised expception class EAccessViolation with message 'Access violation at address 00579283 in module 'LarNetServer.exe'.Read of address 000000A4'.process stop.

你的provider 的poallowcommand 设成是true 了吗？？

LarNetDM是否存在的啊﹖是否沒有建立或者給釋放了﹖

你跟踪一下，看有没有执行到代码,建议中间层不要作数据库操作,没什么实际意义吧?

LarNetDM存在！poallowcommand 也设为true了！
我刚试了一下，只要adoquery不放在数据模块里就没事了！为什么啊？

有无把adoquery的active也设为true呢？？？

试过active＝true了！一样会报错！大家在中间层都怎样写数据库程序呢！？？？

[?]LarNetDM没有Create起来．一定是的．[][][8D][][!][^]

接受答案了.