| 7524 |
boardURL := tmpThread.BoardPlugIn.GetBoardURL( DWORD( tmpThread ) ); |
boardURL := tmpThread.BoardPlugIn.GetBoardURL( DWORD( tmpThread ) ); |
| 7525 |
Board := BBSsFindBoardFromURL( boardURL ); |
Board := BBSsFindBoardFromURL( boardURL ); |
| 7526 |
if Board = nil then begin |
if Board = nil then begin |
| 7527 |
|
//break; |
| 7528 |
// ※作っても追加するところが無いので激しく保留 |
// ※作っても追加するところが無いので激しく保留 |
| 7529 |
//GikoSys.OpenBrowser(inURL, gbtUserApp); |
//GikoSys.OpenBrowser(inURL, gbtUserApp); |
| 7530 |
//Exit; |
//Exit; |
| 7538 |
GikoSys.ReadSubjectFile( Board ); |
GikoSys.ReadSubjectFile( Board ); |
| 7539 |
Exit; |
Exit; |
| 7540 |
end; |
end; |
| 7541 |
end; |
ThreadItem := Board.FindThreadFromFileName( tmpThread.FileName ); |
| 7542 |
|
if ThreadItem = nil then begin |
| 7543 |
ThreadItem := Board.FindThreadFromFileName( tmpThread.FileName ); |
ThreadItem := tmpThread; |
| 7544 |
if ThreadItem = nil then begin |
Board.Insert( 0, ThreadItem ); |
| 7545 |
ThreadItem := tmpThread; |
if ActiveList is TBoard then begin |
| 7546 |
Board.Insert( 0, ThreadItem ); |
if TBoard(ActiveList) = Board then |
| 7547 |
if ActiveList is TBoard then begin |
ListView.Items.Count := ListView.Items.Count + 1; |
| 7548 |
if TBoard(ActiveList) = Board then |
end; |
| 7549 |
ListView.Items.Count := ListView.Items.Count + 1; |
GikoSys.GetPopupResNumber( inURL, stRes, edRes ); |
| 7550 |
end; |
browserRec := InsertBrowserTab( ThreadItem ); |
|
GikoSys.GetPopupResNumber( inURL, stRes, edRes ); |
|
|
browserRec := InsertBrowserTab( ThreadItem ); |
|
|
if (browserRec <> nil) and (stRes > 0) then |
|
|
browserRec.Movement := IntToStr( stRes ); |
|
|
DownloadContent( ThreadItem ); |
|
|
Exit; |
|
|
end else begin |
|
|
tmpThread.Free; |
|
|
GikoSys.GetPopupResNumber( inURL, stRes, edRes ); |
|
|
browserRec := InsertBrowserTab( ThreadItem ); |
|
|
if ThreadItem.IsLogFile then begin |
|
|
if (browserRec <> nil) and (stRes > 0) then |
|
|
BrowserMovement( IntToStr( stRes ), browserRec ); |
|
|
end else begin |
|
| 7551 |
if (browserRec <> nil) and (stRes > 0) then |
if (browserRec <> nil) and (stRes > 0) then |
| 7552 |
browserRec.Movement := IntToStr( stRes ); |
browserRec.Movement := IntToStr( stRes ); |
| 7553 |
DownloadContent( ThreadItem ); |
DownloadContent( ThreadItem ); |
| 7554 |
|
Exit; |
| 7555 |
|
end else begin |
| 7556 |
|
tmpThread.Free; |
| 7557 |
|
GikoSys.GetPopupResNumber( inURL, stRes, edRes ); |
| 7558 |
|
browserRec := InsertBrowserTab( ThreadItem ); |
| 7559 |
|
if ThreadItem.IsLogFile then begin |
| 7560 |
|
if (browserRec <> nil) and (stRes > 0) then |
| 7561 |
|
BrowserMovement( IntToStr( stRes ), browserRec ); |
| 7562 |
|
end else begin |
| 7563 |
|
if (browserRec <> nil) and (stRes > 0) then |
| 7564 |
|
browserRec.Movement := IntToStr( stRes ); |
| 7565 |
|
DownloadContent( ThreadItem ); |
| 7566 |
|
end; |
| 7567 |
|
Exit; |
| 7568 |
end; |
end; |
|
Exit; |
|
| 7569 |
end; |
end; |
|
|
|
|
//Exit; |
|
| 7570 |
end; |
end; |
| 7571 |
|
|
| 7572 |
atBoard: |
atBoard: |