Browse CVS Repository
Diff of /gikonavigoeson/gikonavi/GikoSystem.pas
Parent Directory
| Revision Log
| Revision Graph
| Patch
| 3857 |
function TGikoSys.GetSameIDResAnchor(const AID : string; ThreadItem: TThreadItem):string; |
function TGikoSys.GetSameIDResAnchor(const AID : string; ThreadItem: TThreadItem):string; |
| 3858 |
var |
var |
| 3859 |
i: integer; |
i: integer; |
|
ReadList: TStringList; |
|
|
Res: TResRec; |
|
|
boardPlugIn : TBoardPlugIn; |
|
| 3860 |
body: TStringList; |
body: TStringList; |
| 3861 |
begin |
begin |
| 3862 |
Result := ''; |
Result := ''; |
| 3911 |
function TGikoSys.GetSameIDResAnchor(AIDNum : Integer; ThreadItem: TThreadItem):string; |
function TGikoSys.GetSameIDResAnchor(AIDNum : Integer; ThreadItem: TThreadItem):string; |
| 3912 |
var |
var |
| 3913 |
i: integer; |
i: integer; |
|
ReadList: TStringList; |
|
|
Res: TResRec; |
|
|
boardPlugIn : TBoardPlugIn; |
|
| 3914 |
body: TStringList; |
body: TStringList; |
| 3915 |
begin |
begin |
| 3916 |
Result := ''; |
Result := ''; |
| 3930 |
|
|
| 3931 |
procedure TGikoSys.GetSameIDRes(AIDNum : Integer; ThreadItem: TThreadItem;var body: TStringList); |
procedure TGikoSys.GetSameIDRes(AIDNum : Integer; ThreadItem: TThreadItem;var body: TStringList); |
| 3932 |
var |
var |
|
i: integer; |
|
| 3933 |
Res: TResRec; |
Res: TResRec; |
| 3934 |
boardPlugIn : TBoardPlugIn; |
boardPlugIn : TBoardPlugIn; |
| 3935 |
AID : String; |
AID : String; |
|
|
Legend:
| Removed from v.1.167 |
|
| changed lines |
| |
Added in v.1.168 |
|
|
|