Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/BrowserRecord.pas

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

revision 1.6 by h677, Sat Apr 14 16:52:57 2007 UTC revision 1.7 by h677, Sun Apr 15 16:21:29 2007 UTC
# Line 114  end; Line 114  end;
114  //! ブラウザをスクロールさせる  //! ブラウザをスクロールさせる
115  // *************************************************************************  // *************************************************************************
116  procedure TBrowserRecord.Move(scroll: Integer);  procedure TBrowserRecord.Move(scroll: Integer);
 var  
         top: Integer;  
         item: OleVariant;  
117  begin  begin
118          //ブラウザが付いてるときだけ処理する          //ブラウザが付いてるときだけ処理する
119          if (Self.Browser <> nil) then begin          if (Self.Browser <> nil) then begin

Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7

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