Resize problem ! ( LAAAAAAAAANG !!! )

Hej !

Den her er lang, jeg har en MDI form, med et MDIchild... (TDoc), herunder er nogle forsøg på at tilpasse diverse controls til at have den rigtige størrelse i forhold til hinanden, problemet er, at nogle gange kan man ikke se docHtml's Scrollbar ! HVAD GØR JEG.....

docHtml : TRichEdit
docPreview : TWebBrowserProxy
docStruc  : TTreeview
tabsMenu : TabSet, skifter mellem docHtml, docPreview og docStruc


void __fastcall TDoc::FormCreate(TObject *Sender)
{
  // URL = "http://ultik/mitweb/";
    //ShowMessage("Funktion : FormCreate\nDette er en test");
    this->docHtml->ClientHeight = this->ClientHeight - this->tabsMenu->ClientHeight;

    this->tabsMenu->Top = this->docHtml->ClientHeight + 1;
    this->tabsMenu->Left = 0;

    this->docHtml->Left = 10;

    this->tabsMenu->ClientWidth = this->ClientWidth;

    this->docHtml->ClientWidth = this->ClientWidth - 10;
    this->docHtml->Top = 0;

    this->docPreview->Top = 0;
    this->docPreview->ClientWidth = this->docHtml->ClientWidth+10;
    this->docPreview->ClientHeight = this->docHtml->ClientHeight;
    this->docPreview->Left = 10;
    this->docPreview->Visible = false;
    this->docPreview->Hide();

    this->docStruc->Top = 0;
    this->docStruc->Left = 10;
    this->docStruc->ClientWidth = this->docHtml->ClientWidth;
    this->docStruc->ClientHeight = this->docHtml->ClientHeight;
//    this->docStruc->Hide();

    //this->Caption = "Dokument";
}



void __fastcall TDoc::FormResize(TObject *Sender)
{
  // URL = "http://ultik/mitweb/";

    this->docHtml->ClientHeight = this->ClientHeight - this->tabsMenu->ClientHeight;

    this->tabsMenu->Top = this->docHtml->ClientHeight + 1;
    this->tabsMenu->Left = 0;

    this->docHtml->Left = 10;

    this->tabsMenu->ClientWidth = this->ClientWidth;

    this->docHtml->ClientWidth = this->ClientWidth - 10;
    this->docHtml->Top = 0;

    this->docPreview->Top = 0;
    this->docPreview->ClientWidth = this->docHtml->ClientWidth+10;
    this->docPreview->ClientHeight = this->docHtml->ClientHeight;
    this->docPreview->Left = 0;
//    this->docPreview->Hide();

    this->docStruc->Top = 0;
    this->docStruc->Left = 10;
    this->docStruc->ClientWidth = this->docHtml->ClientWidth;
    this->docStruc->ClientHeight = this->docHtml->ClientHeight;
//    this->docStruc->Hide();

    //this->Caption = "Dokument";
}
//---------------------------------------------------------------------------


På Forhånd tak....

Venlig Hilsen
Ultik
ultik@cyberdude.com