Browse CVS Repository
Diff of /gikonavigoeson/gikonavi/Giko.pas
Parent Directory
| Revision Log
| Revision Graph
| Patch
| 869 |
Writeln(' 終了時は、ギコナビウィンドウを閉じてください'); |
Writeln(' 終了時は、ギコナビウィンドウを閉じてください'); |
| 870 |
Writeln('============================================================'); |
Writeln('============================================================'); |
| 871 |
{$ENDIF} |
{$ENDIF} |
| 872 |
|
//try |
| 873 |
FTreeType := gttNone; |
FTreeType := gttNone; |
| 874 |
// 起動時に保存されてしまう対策 |
// 起動時に保存されてしまう対策 |
| 875 |
FStartUp := true; |
FStartUp := true; |
| 969 |
|
|
| 970 |
// ボードファイル列挙(ReadFavorite より先に行うこと) |
// ボードファイル列挙(ReadFavorite より先に行うこと) |
| 971 |
GikoSys.ListBoardFile; |
GikoSys.ListBoardFile; |
| 972 |
|
// 連続起動時にスプラッシュウィンドウのメモリが不定に |
| 973 |
|
try |
| 974 |
// スプラッシュウィンドウのプログレスバーの設定 |
// スプラッシュウィンドウのプログレスバーの設定 |
| 975 |
SplashWindow.ProgressBar.Max := Length(BBSs) * 20; |
if (SplashWindow <> nil) then begin |
| 976 |
|
SplashWindow.ProgressBar.Max := Length(BBSs) * 20; |
| 977 |
|
end; |
| 978 |
|
except |
| 979 |
|
end; |
| 980 |
// すべてのBBSを読み込んでおく |
// すべてのBBSを読み込んでおく |
| 981 |
for i := Length(BBSs) - 1 downto 0 do begin |
for i := Length(BBSs) - 1 downto 0 do begin |
| 982 |
if not BBSs[i].IsBoardFileRead then |
if not BBSs[i].IsBoardFileRead then |
| 987 |
SplashWindow.Update; |
SplashWindow.Update; |
| 988 |
end; |
end; |
| 989 |
end; |
end; |
| 990 |
|
|
| 991 |
//巡回データ読み込み |
//巡回データ読み込み |
| 992 |
RoundList := TRoundList.Create; |
RoundList := TRoundList.Create; |
| 993 |
RoundList.LoadRoundBoardFile; |
RoundList.LoadRoundBoardFile; |
|
|
Legend:
| Removed from v.1.578.2.2 |
|
| changed lines |
| |
Added in v.1.578.2.3 |
|
|
|