Procedure MainForm.buttonsEnabled(boolean); BEGIN if result=true then begin button1.enabled:=True; button2.enabled:=True; button3.enabled:=True; end else begin button1.enabled:=false; button2.enabled:=false; button3.enabled:=false; end; END;
Procedure MainForm.buttonsEnabled(boolean);
BEGIN
if result=true then
begin
button1.enabled:=True;
button2.enabled:=True;
button3.enabled:=True;
end else
begin
button1.enabled:=false;
button2.enabled:=false;
button3.enabled:=false;
end;
END;