如何 create RemoteDataModule |
|
缺席
|
|
johnny2212
初階會員   發表：34 回覆：65 積分：39 註冊：2003-04-09 發送簡訊給我 |
procedure TForm1.Button1Click(Sender: TObject);
begin
Dump01;
end; procedure TForm1.Dump01;
var
MyServer: TRemoteDataModule2;
begin
MyServer:=TRemoteDataModule2.Create(nil);
end;
以上是沒問題的,請問誰能告訴我如何用
下面類似的方法來作出上面的功能 procedure TForm1.Button1Click(Sender: TObject);
begin
Dump02(RemotetDataModule2);
//這裡過不了(若是DataModule則可)
end; procedure TForm1.Dump02(DM: TRemoteDataModule);
begin
DM.Create(nil);
end;
|
|
huangeider
高階會員 發表：288 回覆：492 積分：231 註冊：2003-02-26 發送簡訊給我 |
依題意RemotetDataModule2是憑空出現,必須宣告物件型態
procedure TForm1.Button1Click(Sender: TObject);
var RemotetDataModule2:TRemoteDataModule;
begin
Dump02(RemotetDataModule2);
//這裡過不了(若是DataModule則可)
datamodule沒宣告可以帶入參數?
您是否有偷偷宣告var DataModule:TRemoteDataModule
end; procedure TForm1.Dump02(DM: TRemoteDataModule);
begin
DM.Create(nil);
end; 「堅持」從洗馬桶做起
Aric
|
|
speedup
資深會員 發表：19 回覆：259 積分：280 註冊：2003-07-04 發送簡訊給我 |
發表時間：2004-01-15 23:58:54
IP:61.226.xxx.xxx 未訂閱
系統時間：2024-05-07 14:05:35
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |