keine reaktion wenn form vergrößert werden soll

[alcaeus]

Hi HaZe,

probiers mal so:

Delphi-Quellcode:

procedure TForm1.Log1Click(Sender: TObject);
begin
  if log1.Checked = false then
    form1.Height := 653
  else
    form1.height := 451;
  Log1.Checked := not Log1.Checked;
end;

@Jim_raynor: es handelt sich nicht um eine Checkbox, sondern um ein MenuItem. Dort muss Checked manuell gesetzt werden.

Greetz
alcaeus