OSDN Git Service

2ちゃん語の設定が無効が再起動後しか有効にならない不具合の修正
authorh677 <h677>
Tue, 13 Dec 2005 15:33:38 +0000 (15:33 +0000)
committerh677 <h677>
Tue, 13 Dec 2005 15:33:38 +0000 (15:33 +0000)
GikoSystem.pas

index 20af87f..3500549 100644 (file)
@@ -3252,12 +3252,13 @@ end;
 //! \83M\83R\83i\83r\82Ì\83\81\83b\83Z\81[\83W\82ð\90Ý\92è\82·\82é
 procedure TGikoSys.SetGikoMessage;
 begin
+       if FGikoMessage = nil then begin
+               FGikoMessage := TGikoMessage.Create;
+       end else begin
+               FGikoMessage.Clear;
+       end;
+
        if (Setting.GengoSupport) then begin
-               if FGikoMessage = nil then begin
-                       FGikoMessage := TGikoMessage.Create;
-               end else begin
-                       FGikoMessage.Clear;
-               end;
                try
                        if (FileExists(Setting.GetLanguageFileName)) then begin
                                FGikoMessage.LoadFromFile(Setting.GetLanguageFileName);