ClientHeight (Delphi)

Description

This example reduces the height of the form's client area by half when you click the button on the form. Note that only the client area is halved, not the entire form.

Code

procedure TForm1.Button1Click(Sender: TObject);
begin
  ClientHeight := ClientHeight div 2;
end;

Uses

• Vcl.Forms.TCustomForm.ClientHeight ( fr | de | ja )