Ir al contenido


Foto

[TRUCO DELPHI] MDI Child / Hija NO Dimensionable.


  • Por favor identifícate para responder
No hay respuestas en este tema

#1 sir.dev.a.lot

sir.dev.a.lot

    Advanced Member

  • Miembros
  • PipPipPip
  • 545 mensajes
  • Location127.0.0.1

Escrito 10 diciembre 2016 - 04:11

[TRUCO DELPHI] MDI Child / Hija NO Dimensionable.


delphi
  1. Type
  2. TfrmMDIChildUnsizeable = Class(TForm)
  3. public
  4. procedure CreateParams(Var Params: TCreateParams); override;
  5. end;
  6.  
  7. implementation
  8.  
  9. procedure TfrmMDIChildUnsizeable.CreateParams(Var Params: TCreateParams);
  10. begin
  11. inherited;
  12. //---
  13. Params.Style := Params.Style - WS_THICKFRAME;
  14. end;
  15.  
  16. end.

Saludos!


  • 1