Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/AbonUnit.pas

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.41 by h677, Thu Aug 25 14:35:25 2005 UTC revision 1.42 by h677, Sat Dec 10 09:09:55 2005 UTC
# Line 374  var Line 374  var
374          pos : Integer;          pos : Integer;
375          buftoken : String;          buftoken : String;
376  begin  begin
         pos := 0;  
377          bufstl := TStringList.Create;          bufstl := TStringList.Create;
378          try          try
379                  if Length(argline) > 0 then begin                  if Length(argline) > 0 then begin

Legend:
Removed from v.1.41  
changed lines
  Added in v.1.42

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26