지금 시작한 울트라 초보입니다.
책은 델파이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라고 할당하는 부분에서 ';'로 에러를 발생시키고
참 머가 먼지 코드가 눈에 아직 안 익숙해서 그러네요 울트라초보에게 한수 좀^^
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;