Cuando terminó la conversación que hay puesta, y con la información de _Leo creé esta función. Devuelve tanto las filas como las columnas creo, está en periodo de prueba todabía. Si no va o sabeis arregrarlo decidlo . ok?void MaximoTamMemo(TRichEdit * RichEdit,int *MaxFilas,int*MaxColumnas)
{ //Memo1->Handle
HDC hdc = GetDC(RichEdit->Handle);
SIZE size;
SelectObject(hdc, RichEdit->Font->Handle);
GetTextExtentPoint32(hdc, "Wg", 2, &size);
*MaxFilas = (RichEdit->ClientHeight-2) / size.cy;
*MaxColumnas = 2*(RichEdit->ClientWidth-2) / size.cx;
ReleaseDC(RichEdit->Handle, hdc);
}