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; code example

Example: 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;