透明あぼ〜んに対応（空行時の出力抑制）

diff --git a/ExternalThreadItem.pas b/ExternalThreadItem.pas
index b58b749..08d402e 100644 (file)
--- a/ExternalThreadItem.pas
+++ b/ExternalThreadItem.pas
@@ -289,67 +289,71 @@ begin
        threadItem      := TThreadItem( inInstance );
        // \88ø\90\94\82ð\95ª\89ð
        res                                     := GikoSys.DivideStrLine( string( inDatRes ) );
-       res.FBody               := GikoSys.ConvRes( res.FBody, threadItem.ParentBoard.BBSID, ChangeFileExt( threadItem.FileName, '' ), 'bbs', 'key', 'st', 'to', 'nofirst', 'true' );
-       res.FBody               := GikoSys.AddAnchorTag( res.FBody );
-       no                                      := IntToStr( inResNo );
-
-       try
-               if GikoSys.Setting.UseSkin then begin
-                       // \83X\83L\83\93
-                       if inIsNew then
-                               Result := CreateResultString( GikoSys.SkinedRes(
-                                       GikoSys.LoadFromSkin(
-                                               GikoSys.Setting.GetSkinNewResFileName, threadItem, threadItem.SizeByte
-                                       ), res, no
-                               ) )
-                       else
-                               Result := CreateResultString( GikoSys.SkinedRes(
-                                       GikoSys.LoadFromSkin(
-                                               GikoSys.Setting.GetSkinResFileName, threadItem, threadItem.SizeByte
-                                       ), res, no
-                               ) );
-               end else if GikoSys.Setting.UseCSS then begin
-                       // CSS
-                       if res.FName = '' then
-                               res.FName := ' ';
-                       if res.FMailTo = '' then
-                               Result := CreateResultString( '<a name="' + no + '"></a>'
-                                                               + '<div class="header"><span class="no"><a href="menu:' + No + '">' + no + '</a></span> '
-                                                               + '<span class="name_label">\96¼\91O\81F</span> '
-                                                               + '<span class="name"><b>' + res.FName + '</b></span> '
-                                                               + '<span class="date_label">\93\8a\8de\93ú\81F</span> '
-                                                               + '<span class="date">' + res.FDateTime+ '</span></div>'
-                                                               + '<div class="mes">' + res.FBody + ' </div>' )
-                       else if GikoSys.Setting.ShowMail then
-                               Result := CreateResultString( '<a name="' + no + '"></a>'
-                                                               + '<div class="header"><span class="no"><a href="menu:' + no + '">' + no + '</a></span>'
-                                                               + '<span class="name_label"> \96¼\91O\81F </span>'
-                                                               + '<a class="name_mail" href="mailto:' + res.FMailTo + '">'
-                                                               + '<b>' + res.FName + '</b></a><span class="mail"> [' + res.FMailTo + ']</span>'
-                                                               + '<span class="date_label"> \93\8a\8de\93ú\81F</span>'
-                                                               + '<span class="date"> ' + res.FDateTime+ '</span></div>'
-                                                               + '<div class="mes">' + res.FBody + ' </div>' )
-                       else
-                               Result := CreateResultString( '<a name="' + no + '"></a>'
-                                                               + '<div class="header"><span class="no"><a href="menu:' + no + '">' + no + '</a></span>'
-                                                               + '<span class="name_label"> \96¼\91O\81F </span>'
-                                                               + '<a class="name_mail" href="mailto:' + res.FMailTo + '">'
-                                                               + '<b>' + res.FName + '</b></a>'
-                                                               + '<span class="date_label"> \93\8a\8de\93ú\81F</span>'
-                                                               + '<span class="date"> ' + res.FDateTime+ '</span></div>'
-                                                               + '<div class="mes">' + res.FBody + ' </div>' );
-               end else begin
-                       // \83f\83t\83H\83\8b\83g
-                       if res.FMailTo = '' then
-                               Result := CreateResultString( '<a name="' + no + '"></a><dt><a href="menu:' + no + '">' + no + '</a> \96¼\91O\81F<font color="forestgreen"><b> ' + res.FName + ' </b></font> \93\8a\8de\93ú\81F ' + res.FDateTime+ '<br><dd>' + res.Fbody + ' <br><br><br>' )
-                       else if GikoSys.Setting.ShowMail then
-                               Result := CreateResultString( '<a name="' + no + '"></a><dt><a href="menu:' + no + '">' + no + '</a> \96¼\91O\81F<a href="mailto:' + res.FMailTo + '"><b> ' + res.FName + ' </B></a> [' + res.FMailTo + '] \93\8a\8de\93ú\81F ' + res.FDateTime+ '<br><dd>' + res.Fbody + ' <br><br><br>' )
-                       else
-                               Result := CreateResultString( '<a name="' + no + '"></a><dt><a href="menu:' + no + '">' + no + '</a> \96¼\91O\81F<a href="mailto:' + res.FMailTo + '"><b> ' + res.FName + ' </B></a> \93\8a\8de\93ú\81F ' + res.FDateTime+ '<br><dd>' + res.Fbody + ' <br><br><br>' );
-               end;
-       except
-               Result := nil;
-       end;
+    if AnsiCompareStr( string( inDatRes ) , '' ) <> 0 then begin
+        res.FBody              := GikoSys.ConvRes( res.FBody, threadItem.ParentBoard.BBSID, ChangeFileExt( threadItem.FileName, '' ), 'bbs', 'key', 'st', 'to', 'nofirst', 'true' );
+        res.FBody              := GikoSys.AddAnchorTag( res.FBody );
+        no                                     := IntToStr( inResNo );
+
+        try
+            if GikoSys.Setting.UseSkin then begin
+                // \83X\83L\83\93
+                if inIsNew then
+                    Result := CreateResultString( GikoSys.SkinedRes(
+                        GikoSys.LoadFromSkin(
+                            GikoSys.Setting.GetSkinNewResFileName, threadItem, threadItem.SizeByte
+                        ), res, no
+                    ) )
+                else
+                    Result := CreateResultString( GikoSys.SkinedRes(
+                        GikoSys.LoadFromSkin(
+                            GikoSys.Setting.GetSkinResFileName, threadItem, threadItem.SizeByte
+                        ), res, no
+                    ) );
+            end else if GikoSys.Setting.UseCSS then begin
+                // CSS
+                if res.FName = '' then
+                    res.FName := '&nbsp;';
+                if res.FMailTo = '' then
+                    Result := CreateResultString( '<a name="' + no + '"></a>'
+                                    + '<div class="header"><span class="no"><a href="menu:' + No + '">' + no + '</a></span> '
+                                    + '<span class="name_label">\96¼\91O\81F</span> '
+                                    + '<span class="name"><b>' + res.FName + '</b></span> '
+                                    + '<span class="date_label">\93\8a\8de\93ú\81F</span> '
+                                    + '<span class="date">' + res.FDateTime+ '</span></div>'
+                                    + '<div class="mes">' + res.FBody + ' </div>' )
+                else if GikoSys.Setting.ShowMail then
+                    Result := CreateResultString( '<a name="' + no + '"></a>'
+                                    + '<div class="header"><span class="no"><a href="menu:' + no + '">' + no + '</a></span>'
+                                    + '<span class="name_label"> \96¼\91O\81F </span>'
+                                    + '<a class="name_mail" href="mailto:' + res.FMailTo + '">'
+                                    + '<b>' + res.FName + '</b></a><span class="mail"> [' + res.FMailTo + ']</span>'
+                                    + '<span class="date_label"> \93\8a\8de\93ú\81F</span>'
+                                    + '<span class="date"> ' + res.FDateTime+ '</span></div>'
+                                    + '<div class="mes">' + res.FBody + ' </div>' )
+                else
+                    Result := CreateResultString( '<a name="' + no + '"></a>'
+                                    + '<div class="header"><span class="no"><a href="menu:' + no + '">' + no + '</a></span>'
+                                    + '<span class="name_label"> \96¼\91O\81F </span>'
+                                    + '<a class="name_mail" href="mailto:' + res.FMailTo + '">'
+                                    + '<b>' + res.FName + '</b></a>'
+                                    + '<span class="date_label"> \93\8a\8de\93ú\81F</span>'
+                                    + '<span class="date"> ' + res.FDateTime+ '</span></div>'
+                                    + '<div class="mes">' + res.FBody + ' </div>' );
+            end else begin
+                // \83f\83t\83H\83\8b\83g
+                if res.FMailTo = '' then
+                    Result := CreateResultString( '<a name="' + no + '"></a><dt><a href="menu:' + no + '">' + no + '</a> \96¼\91O\81F<font color="forestgreen"><b> ' + res.FName + ' </b></font> \93\8a\8de\93ú\81F ' + res.FDateTime+ '<br><dd>' + res.Fbody + ' <br><br><br>' )
+                else if GikoSys.Setting.ShowMail then
+                    Result := CreateResultString( '<a name="' + no + '"></a><dt><a href="menu:' + no + '">' + no + '</a> \96¼\91O\81F<a href="mailto:' + res.FMailTo + '"><b> ' + res.FName + ' </B></a> [' + res.FMailTo + '] \93\8a\8de\93ú\81F ' + res.FDateTime+ '<br><dd>' + res.Fbody + ' <br><br><br>' )
+                else
+                    Result := CreateResultString( '<a name="' + no + '"></a><dt><a href="menu:' + no + '">' + no + '</a> \96¼\91O\81F<a href="mailto:' + res.FMailTo + '"><b> ' + res.FName + ' </B></a> \93\8a\8de\93ú\81F ' + res.FDateTime+ '<br><dd>' + res.Fbody + ' <br><br><br>' );
+            end;
+        except
+            Result := nil;
+        end;
+    end else begin
+       Result := nil;
+    end;
 
 end;