| 修訂 | 4a7988bea46257f160f00e189aaf44d2bc6a7ce6 (tree) |
|---|---|
| 時間 | 2006-01-01 01:32:24 |
| 作者 | h677 <h677> |
| Commiter | h677 |
ギコナビを連続で起動したときに例外が発生し、フォームレイアウトが壊れる不具合の修正（再修正）
| @@ -869,6 +869,7 @@ begin | ||
| 869 | 869 | Writeln(' 終了時は、ギコナビウィンドウを閉じてください'); |
| 870 | 870 | Writeln('============================================================'); |
| 871 | 871 | {$ENDIF} |
| 872 | +//try | |
| 872 | 873 | FTreeType := gttNone; |
| 873 | 874 | // 起動時に保存されてしまう対策 |
| 874 | 875 | FStartUp := true; |
| @@ -968,10 +969,14 @@ begin | ||
| 968 | 969 | |
| 969 | 970 | // ボードファイル列挙(ReadFavorite より先に行うこと) |
| 970 | 971 | GikoSys.ListBoardFile; |
| 971 | - | |
| 972 | + // 連続起動時にスプラッシュウィンドウのメモリが不定に | |
| 973 | + try | |
| 972 | 974 | // スプラッシュウィンドウのプログレスバーの設定 |
| 973 | - SplashWindow.ProgressBar.Max := Length(BBSs) * 20; | |
| 974 | - | |
| 975 | + if (SplashWindow <> nil) then begin | |
| 976 | + SplashWindow.ProgressBar.Max := Length(BBSs) * 20; | |
| 977 | + end; | |
| 978 | + except | |
| 979 | + end; | |
| 975 | 980 | // すべてのBBSを読み込んでおく |
| 976 | 981 | for i := Length(BBSs) - 1 downto 0 do begin |
| 977 | 982 | if not BBSs[i].IsBoardFileRead then |
| @@ -982,6 +987,7 @@ begin | ||
| 982 | 987 | SplashWindow.Update; |
| 983 | 988 | end; |
| 984 | 989 | end; |
| 990 | + | |
| 985 | 991 | //巡回データ読み込み |
| 986 | 992 | RoundList := TRoundList.Create; |
| 987 | 993 | RoundList.LoadRoundBoardFile; |
Fork
Giko.pas