・動作試験は{$IF}で分岐

diff --git a/Round.pas b/Round.pas
index 88f573a..8506ce5 100644 (file)
--- a/Round.pas
+++ b/Round.pas
@@ -69,7 +69,9 @@ begin
 //             GikoSys.MsgBox(msg, '\83G\83\89\81[', MB_OK or MB_ICONSTOP);
 //             Exit;
 //     end;
-    Giko.GikoForm.LoginAction.Checked := true;
+{$IF Defined(FRCRND) }
+    Giko.GikoForm.LoginAction.Checked := true; // \93®\8dì\8e\8e\8c±\97p\93r
+{$IFEND}
        if not Giko.GikoForm.LoginAction.Checked then begin
                msg := '\83\8d\83O\83C\83\93\82µ\82È\82¢\82Æ\8f\84\89ñ\82Í\8fo\97\88\82Ü\82¹\82ñ';// + #13#10
 //                              + '\95ª\82©\82ç\82È\82¢\90l\82Í\83M\83R\83i\83r\83X\83\8c\83b\83h\82Å\95·\82¢\82Ä\82­\82¾\82³\82¢';