中间层的主窗口不能调用RemoteDataModule中的过程、变量?//下面是中间层RemoteDataModule中的方法
procedure tserver.aaa();
begin
query.Close ;
query.SQL.Clear ;
query.SQL.Add('EXEC sp001);
query.ExecSQL ;
end;
----------------------------------------
//下面是中间层主截面的弹出菜单
procedure TForm1.N1Click(Sender: TObject);
begin
//可以这样tyytser.Create();
//也可以这样tyytser.ClassName
tserver.AAA();//就是不能这样,
end;
是怎么回事情啊!
是哪里没有设置好还是......!谢谢各位老大了!!!!
procedure tserver.aaa();
begin
query.Close ;
query.SQL.Clear ;
query.SQL.Add('EXEC sp001);
query.ExecSQL ;
end;
----------------------------------------
//下面是中间层主截面的弹出菜单
procedure TForm1.N1Click(Sender: TObject);
begin
//可以这样tyytser.Create();
//也可以这样tyytser.ClassName
tserver.AAA();//就是不能这样,
end;
是怎么回事情啊!
是哪里没有设置好还是......!谢谢各位老大了!!!!
解决方案 »
- 代码转换的问题
- delphi下intraweb开发的exe文档如何在iis下面发布?
- 有什么好的网格控件可以实现分组显示并小计,DBGridEh可以吗?
- 一个数据库修改问题
- 请问ServerSocket的OnAccepte和OnClientConnect有什么区别
- Easy Question
- 哪位老兄机器上装有Delphi 5 ?? 请发给我一个 文件TEEQR50.bpl 在/System32下重谢!!!狂谢
- 怎样使qreport报表在生成应用程序后,还能对报表控件进行调整,就像fastreport的frDesigner的功能一样!
- 评选一下csdn之Delphi论坛十大杰出人物!
- 关于RichView的问题,虚心求教!困扰很久了
- 高分讨论:Windows下如何通过一个已经建立的端口收发数据
- 如何取dbgrideh中统计数啊
procedure tserver.aaa();
d的单元结构:
unit Unit1; //单元名称interface //表示本单元的接口部分,表示我用人家人家用的的内容.uses //我用人家的
Windows, ...;//类型声明
type
TForm1 = class(TForm)
...
private
...
public
function F1:integer;//外部单元可以访问的本窗体类的全局方法
end;
//定义类型实例
var
Form1: TForm1;function F2:integer; //外部单元可以访问的全局方法implementation //实现部分, 表示以下内容是{$R *.dfm} //窗体信息定义文件function F2:integer;
begin
... //具体实现过程
end;function TForm1。F1:integer;//外部单元可以访问的本窗体类的全局方法
begin
...//具体实现过程end;
end.