Browse CVS Repository
Diff of /gikonavigoeson/gikonavi/AbonUnit.pas
Parent Directory
| Revision Log
| Revision Graph
| Patch
| 777 |
var |
var |
| 778 |
i : Integer; |
i : Integer; |
| 779 |
begin |
begin |
| 780 |
if FAbonRes[0].Res <> 0 then begin |
if (FAbonRes.Count > 0) and (FAbonRes[0].Res <> 0) then begin |
| 781 |
for i := 0 to FAbonRes.Count - 1 do begin |
for i := 0 to FAbonRes.Count - 1 do begin |
| 782 |
if FAbonRes[i].Res = ResNum then begin |
if FAbonRes[i].Res = ResNum then begin |
| 783 |
Result := true; |
Result := true; |
|
|
Legend:
| Removed from v.1.33 |
|
| changed lines |
| |
Added in v.1.34 |
|
|
|