Изменение размеров TextBox

[Pika4u]

Добрый день. Пытаюсь адаптировать TextBox под размеры введенного текста. Свойства Multiline и WordWrap установлены в True. Вот такой код в принципе работает, но только если нажимать Enter для перехода. Если просто вводить текст сплошняком, то переход на новую строку есть, а вот изменения размеров - нет.

System::Void Form1::textBox1_keyDown(System::Object^  sender, System::Windows::Forms::KeyEventArgs^  e)
{
    int w, h;
    w = (int)CreateGraphics()->MeasureString(textBox1->Text, textBox1->Font).Width;
    h = (int)textBox1->CreateGraphics()->MeasureString(textBox1->Text, textBox1->Font).Height;
    textBox1->Top = textBox1->Parent->Bottom - (44+h);
    textBox1->Height = 26+h;
}

Пробовал считать длина текста(в коде выше это переменная w) и сравнивать с длиной (textBox1->Width). Ничего хорошего не получилось, в общем. Пробовал считать число символов переноса - не помогло. Символ переноса возникает в тексте только при нажатии Enter, а при автоматическом переводе строки его нет. В общем, мучаюсь я третий день и загнал себя в тупик. Если вкратце - нужно адекватно обеспечить подгонку размеров TextBox под вводимый текст. Заранее спасибо))