全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1069
推到 Plurk!
推到 Facebook!

TFPList.foreachcall 轉換成delphi

答題得分者是:pedro
qaz5422367
一般會員


發表:3
回覆:0
積分:0
註冊:2015-10-15

發送簡訊給我
#1 引用回覆 回覆 發表時間:2015-10-30 10:42:12 IP:220.130.xxx.xxx 訂閱
各位高手大大:

我想知道Delphi 中TFPlist的Foreachcall要怎麼實用?

看了許多文章後,仍然對此function不是很理解,

///////////////////////////以下為定義////////////////////////////////////////////
type
TListCallback = procedure(data,arg:pointer) of object;
TListStaticCallback = procedure(data,arg:pointer);
public
procedure ForEachCall(proc2call:TObjectListCallback;arg:pointer); overload;
procedure ForEachCall(proc2call:TObjectListStaticCallback;arg:pointer); overload;
///////////////////////////////////////////////////////////////////////

有高手能夠解釋一下Foreachcall是在做什麼事,與如何應用?

感激不敬!
------
闕于強
pedro
尊榮會員


發表:152
回覆:1187
積分:892
註冊:2002-06-12

發送簡訊給我
#2 引用回覆 回覆 發表時間:2015-11-03 12:19:07 IP:211.75.xxx.xxx 未訂閱
Hi 闕于強,

使用它需要帶參數給一個CallBack的程序, 底下片段程式示範給你參考

[code delphi]
procedure TForm1.FormCreate(Sender: TObject);
var
testlist: TFPObjectList;
obj1,obj2:TObject;
begin
testlist := TFPObjectList.Create;
obj1:=TObject.Create;
obj2:=TObject.Create;
testlist.Add(obj1);
testlist.Add(obj2);

testlist.ForEachCall(CallBack,nil);
testlist.Free ;
end;

procedure TForm1.CallBack(data: TObject; arg: pointer);
begin
Memo1.Lines.Add(Data.ClassName);
end;
[/code]

===================引 用 qaz5422367 文 章===================
各位高手大大:

我想知道Delphi 中TFPlist的Foreachcall要怎麼實用?

看了許多文章後,仍然對此function不是很理解,

///////////////////////////以下為定義////////////////////////////////////////////
type
TListCallback = procedure(data,arg:pointer) of object;
TListStaticCallback = procedure(data,arg:pointer);
public
procedure ForEachCall(proc2call:TObjectListCallback;arg:pointer); overload;
procedure ForEachCall(proc2call:TObjectListStaticCallback;arg:pointer); overload;
///////////////////////////////////////////////////////////////////////

有高手能夠解釋一下Foreachcall是在做什麼事,與如何應用?

感激不敬!
系統時間:2024-03-28 17:48:38
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!