Q&A

  • 조건문에 관하여 입니다.
지금 시작한 울트라 초보입니다.

책은 델파이5를 보고 잇습니다.

툴은 델파이 6를 쓰구요 트라이얼이지만 -_-

근데 문법에서 if문을 보구 책을 따라 햇는데 에러가 나네요.


소스부
=====================================================================
procedure TForm1.ShowTheFormUpdate(Sender: TObject);
begin
        if(Form2.Visible = True) then
        begin
                ShowTheForm.Enabled := False;
                ShowTheForm.Checked := True;
        end;
        else
        begin
                ShowTheForm.Enabled :=True;
                ShowTheForm.Checked := False;
        end;
end;
======================================================================


에러부
======================================================================
[Error] Unit1.pas(42): ';' not allowed before 'ELSE'

======================================================================
else 전에 ';' 를 허용할수 없다 -_-

';'를 빼도 마찬가지로 True라고 할당하는 부분에서 ';'로 에러를 발생시키고

참 머가 먼지 코드가 눈에 아직 안 익숙해서 그러네요 울트라초보에게 한수 좀^^
1  COMMENTS
  • Profile
    김규억 2002.05.20 19:55



    procedure TForm1.ShowTheFormUpdate(Sender: TObject);
    begin
            if(Form2.Visible = True) then
            begin
                    ShowTheForm.Enabled := False;
                    ShowTheForm.Checked := True;
            end;

            -> 여기를 그냥 'end' 로 쓰시면 되겄네요...


            else
            begin
                    ShowTheForm.Enabled :=True;
                    ShowTheForm.Checked := False;
            end;
    end;