Basic form



  • How to make the main form closed (e.g., form1(functional), i.e., open form2, form3...and didn't close with the main shape?



  • Hang the processor. OnClose with code:

    procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
    begin
      Action := caHide; // Теперь главная форма скроется вместо уничтожения caFree
    end;
    

Log in to reply
 


Suggested Topics

  • 2
  • 2
  • 2
  • 2
  • 2
  • 2
  • 2
  • 2
  • 2
  • 2
  • 2
  • 2
  • 2
  • 2
  • 2