AutoResize controles

[vivamotos]

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]

Hola vivamotos.

Probá si te sirve de este modo:

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]

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

// Saludos