一个奇怪的问题
我这样写就没有问题
服务段函function TDateLInk.Get_sss: OleVariant;
var
Str :String;
begin
With ADOSetdo
begin
Close;
SQL.Clear;
SQL.Add('Select ISNULL(Max(DutyID),0) From DutyInfo' );
Open;
end;
Result :=Provider.Data;
end;
客户端调用:
Frm_Data.Client.Data :=Frm_Data.Socket.AppServer.sss;
这样就可以在DBGrid中显示出来,是怎么回事啊?
是不是Delphi不接受带参数的函数
还是我在设置的时候那里出错了?