Foros Club Delphi - AutoResize controles

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- C++ Builder (https://www.clubdelphi.com/foros/forumdisplay.php?f=13)

- - AutoResize controles (https://www.clubdelphi.com/foros/showthread.php?t=75000)

vivamotos

23-07-2011 16:41:05

AutoResize controles

Buenas tardes,

Me gustaría saber como puedo hacer que al cambiar el tamaño la aplicación tambien se expanda un TMemo conforme al nuevo tamaño, se puede? como?

Grácias.

ecfisa

25-07-2011 17:31:51

Hola vivamotos.

Probá si te sirve de este modo:

Código:

void __fastcall TForm1::FormShow(TObject *Sender)

{

 FIni_H = (double)Memo1->Height / Height;

 FIni_W = (double)Memo1->Width / Width;

}



void __fastcall TForm1::FormCanResize(TObject *Sender, int &NewWidth,

      int &NewHeight, bool &Resize)

{

  Memo1->Height = (int)NewHeight * FIni_H;

  Memo1->Width = (int)NewWidth * FIni_W;

}

FIni_H y FIni_W son variables de tipo double, privadas de Form1.

Saludos.

roman

25-07-2011 17:37:09

Además de lo que te comenta ecfisa, quizá te sirve usar la propiedad Align del Memo o bien su propiedad Anchors.

// Saludos

La franja horaria es GMT +2. Ahora son las 20:57:17.