Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/ItemDownload.pas

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

revision 1.11 by yoffy, Sat Nov 15 13:04:56 2003 UTC revision 1.12 by yoffy, Sat Nov 15 14:23:08 2003 UTC
# Line 902  var Line 902  var
902      boardItem   := TBoard( inInstance );      boardItem   := TBoard( inInstance );
903    
904      boardItem.IntData := boardItem.IntData + 1;      boardItem.IntData := boardItem.IntData + 1;
     // ※作り途中。本当は URL ではなく FileName を引数に取る※  
905      index := boardItem.GetIndexFromURL( string( inURL ) );      index := boardItem.GetIndexFromURL( string( inURL ) );
906      if index = -1 then begin      if index = -1 then begin
907        //新しいスレッド        //新しいスレッド
# Line 910  var Line 909  var
909    
910        threadItem.Title                          := string( inTitle );        threadItem.Title                          := string( inTitle );
911  //                              threadItem.Count := inCount;  //                              threadItem.Count := inCount;
912                            threadItem.AllResCount  := inCount;
913        threadItem.ParentBoard    := Board;        threadItem.ParentBoard    := Board;
914        threadItem.No                                             := boardItem.IntData;        threadItem.No                                             := boardItem.IntData;
915        threadItem.RoundDate              := ZERO_DATE;        threadItem.RoundDate              := ZERO_DATE;

Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12

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