Shortcuts: Vollbildmodus auf STRG+V

[nano]

Sorry, hab noch sehr wenig Erfahrung, daher so viele Fragen..

Also.. hab das jetzt so umgeschrieben

Delphi-Quellcode:

procedure TMain.VollbildmodusExecute(Sender: TObject);
begin
  with Vollbildmodus do
  begin
    Checked := not Checked;
    if Checked then
    begin
      SidePanelVisible:= SidePanel.Visible;
      CoolBarVisible:= CoolBar.Visible;
      SidePanel.Visible:= false;
      CoolBar.Visible:= false;
      Status.Visible:= false;
      Main.BorderStyle:= bsNone;
      Main.WindowState:= wsMaximized;
    end else
    begin
      SidePanel.Visible:= SidePanelVisible;
      CoolBar.Visible:= CoolBarVisible;
      Status.Visible:= true;
      Main.BorderStyle:= bsSizeable;
      Main.WindowState:= wsNormal;
    end;
  end;
end;

aber es klappt trotzdem nicht *verzweifelt*

sorry, stehe jetzt echt auf der Leitung...