IDのない板の過去ログの投稿日が抜ける不具合の修正

[gikonavigoeson/gikonavi.git] / res / ExternalBoardPlugIn / ShitarabaJBBSPlugIn.dpr

diff --git a/res/ExternalBoardPlugIn/ShitarabaJBBSPlugIn.dpr b/res/ExternalBoardPlugIn/ShitarabaJBBSPlugIn.dpr
index cfcb718..ded73ee 100644 (file)
--- a/res/ExternalBoardPlugIn/ShitarabaJBBSPlugIn.dpr
+++ b/res/ExternalBoardPlugIn/ShitarabaJBBSPlugIn.dpr
@@ -3,7 +3,7 @@ library ShitarabaJBBSPlugIn;
 {
        ShitarabaJBBSPlugIn
        \82µ\82½\82ç\82Î\8f\88\97\9d\83\86\83j\83b\83g
-       $Id: ShitarabaJBBSPlugIn.dpr,v 1.37 2004/10/14 03:49:44 yoffy Exp $
+       $Id: ShitarabaJBBSPlugIn.dpr,v 1.38 2005/03/24 13:55:32 h677 Exp $
 }
 
 uses
@@ -83,7 +83,7 @@ const
        MAJOR_VERSION                   = 1;
        MINOR_VERSION                   = 1;
        RELEASE_VERSION         = 'alpha';
-       REVISION_VERSION        = 3;
+       REVISION_VERSION        = 4;
 
        SYNCRONIZE_MENU_CAPTION = '\82µ\82½\82ç\82ÎJBBS\94Â\8dX\90V';
 
@@ -711,6 +711,7 @@ begin
                                        //\8fã\82Ü\82Å\82Ì\8f\88\97\9d\82Å\88È\89º\82Ì\82æ\82¤\82È\8c`\82É\82È\82Á\82Ä\82é
                                        //<dt><a name="958">958 </a> \96¼\91O\81F<font color="#008800"><b> \96¼\82à\96³\82«\8cR\8et </b></font> \93\8a\8de\93ú\81F 2004/06/30(\90\85) 15:17 [ r1FsjJhA ]<br><dd>\81`\81`
                                        //<dt><a name="951">951 </a> \96¼\91O\81F<a href="mailto:sage"><b> \96¼\82à\96³\82«\8cR\8et </B></a> \93\8a\8de\93ú\81F 2004/06/30(\90\85) 12:31 [ .oGr0rtc ]<br><dd>\81`\81`
+                    //<dt><a name="951">951 </a> \96¼\91O\81F<a href="mailto:sage"><b> \96¼\82à\96³\82«\8cR\8et </B></a> \93\8a\8de\93ú\81F 2004/06/30(\90\85) 12:31<br><dd>\81`\81` <-ID\82Ì\82È\82¢\94Â
                                        //\8fã\82Ì\82æ\82¤\82È\82Ì\82ð\89º\82Ì\82æ\82¤\82Èdat\82Ì\8c`\8e®\82É\95Ï\8a·\82·\82é
                                        //\83\8c\83X\94Ô\8d\86<><font color=#FF0000>HN</font><>\83\81\83\8b\97\93<>\93ú\95t\8e\9e\8d\8f<>\96{\95¶<>\83^\83C\83g\83\8b\81i\82P\82Ì\82Ý\81j<>ID
                                        //2<>\96¼\82à\96³\82«\8cR\8et<>sage<>2004/06/22(\89Î) 09:05<>\82Q\82°\82Æ\81[<><>26bmLAzg
@@ -777,12 +778,14 @@ begin
                                                //====================//
                                                //==ID\82Ì\8eæ\93¾==//
                                                tmpLine := AnsiLowerCase(tmpHTML[i]);
+                        tS := AnsiPos('<br>', tmpLine);
                                                tE := AnsiPos(']', tmpLine);
-                                               if tE > 0 then begin
+                                               if (tE > 0) and (tE > tS) then begin
                                                        tmpDatToken[6] := Trim(Copy(tmpHTML[i], 1, tE - 1 ));
-                                               end else begin
-                                                       tmpDatToken[6] := '';
-                                               end;
+                                               end else if (tS > 0) then begin
+                                                       tmpDatToken[6] := Trim(Copy(tmpHTML[i], 1, tS - 1 ));
+                                               end else
+                            tmpDatToken[6] := Trim(tmpHTML[i]);
                                                //====================//
                                                tS := StrToIntDef(tmpDatToken[0], -1);
                                                if  tS = 1      then