| 113 |
|
|
| 114 |
implementation |
implementation |
| 115 |
|
|
| 116 |
uses ExternalBoardManager, GikoSystem, BoardGroup; |
uses ExternalBoardManager, GikoSystem, BoardGroup, HTMLCreate; |
| 117 |
|
|
| 118 |
// ************************************************************************* |
// ************************************************************************* |
| 119 |
// TThreadItem クラスのプロパティを取得する |
// TThreadItem クラスのプロパティを取得する |
| 298 |
if AnsiCompareStr( string( inDatRes ) , '' ) <> 0 then begin |
if AnsiCompareStr( string( inDatRes ) , '' ) <> 0 then begin |
| 299 |
res.FBody := GikoSys.DeleteLink(res.FBody); |
res.FBody := GikoSys.DeleteLink(res.FBody); |
| 300 |
res.FBody := GikoSys.AddAnchorTag( res.FBody ); |
res.FBody := GikoSys.AddAnchorTag( res.FBody ); |
| 301 |
res.FBody := GikoSys.ConvRes( res.FBody, threadItem.ParentBoard.BBSID, ChangeFileExt( threadItem.FileName, '' ), 'bbs', 'key', 'st', 'to', 'nofirst', 'true'); |
res.FBody := HTMLCreater.ConvRes( res.FBody, threadItem.ParentBoard.BBSID, ChangeFileExt( threadItem.FileName, '' ), 'bbs', 'key', 'st', 'to', 'nofirst', 'true'); |
| 302 |
|
|
| 303 |
no := IntToStr( inResNo ); |
no := IntToStr( inResNo ); |
| 304 |
|
|
| 306 |
if GikoSys.Setting.UseSkin then begin |
if GikoSys.Setting.UseSkin then begin |
| 307 |
// スキン |
// スキン |
| 308 |
if inIsNew then |
if inIsNew then |
| 309 |
Result := CreateResultString( GikoSys.SkinedRes( |
Result := CreateResultString( HTMLCreater.SkinedRes( |
| 310 |
GikoSys.LoadFromSkin( |
HTMLCreater.LoadFromSkin( |
| 311 |
GikoSys.Setting.GetSkinNewResFileName, threadItem, threadItem.Size |
GikoSys.Setting.GetSkinNewResFileName, threadItem, threadItem.Size |
| 312 |
), res, no |
), res, no |
| 313 |
) ) |
) ) |
| 314 |
else |
else |
| 315 |
Result := CreateResultString( GikoSys.SkinedRes( |
Result := CreateResultString( HTMLCreater.SkinedRes( |
| 316 |
GikoSys.LoadFromSkin( |
HTMLCreater.LoadFromSkin( |
| 317 |
GikoSys.Setting.GetSkinResFileName, threadItem, threadItem.Size |
GikoSys.Setting.GetSkinResFileName, threadItem, threadItem.Size |
| 318 |
), res, no |
), res, no |
| 319 |
) ); |
) ); |
| 387 |
try |
try |
| 388 |
if GikoSys.Setting.UseSkin then begin |
if GikoSys.Setting.UseSkin then begin |
| 389 |
// スキン |
// スキン |
| 390 |
skinHeader := GikoSys.LoadFromSkin( GikoSys.Setting.GetSkinHeaderFileName, threadItem, threadItem.Size ); |
skinHeader := HTMLCreater.LoadFromSkin( GikoSys.Setting.GetSkinHeaderFileName, threadItem, threadItem.Size ); |
| 391 |
if Length( optionalHeader ) > 0 then |
if Length( optionalHeader ) > 0 then |
| 392 |
skinHeader := |
skinHeader := |
| 393 |
StringReplace( skinHeader, '</head>', optionalHeader + '</head><a name="top"></a>', [] ); |
StringReplace( skinHeader, '</head>', optionalHeader + '</head><a name="top"></a>', [] ); |
| 443 |
try |
try |
| 444 |
if GikoSys.Setting.UseSkin then begin |
if GikoSys.Setting.UseSkin then begin |
| 445 |
// スキン |
// スキン |
| 446 |
skinFooter := GikoSys.LoadFromSkin( GikoSys.Setting.GetSkinFooterFileName, threadItem, threadItem.Size ); |
skinFooter := HTMLCreater.LoadFromSkin( GikoSys.Setting.GetSkinFooterFileName, threadItem, threadItem.Size ); |
| 447 |
if Length( optionalFooter ) > 0 then |
if Length( optionalFooter ) > 0 then |
| 448 |
skinFooter := |
skinFooter := |
| 449 |
StringReplace( skinFooter, '</body>', optionalFooter + '</body>', [] ); |
StringReplace( skinFooter, '</body>', optionalFooter + '</body>', [] ); |