🚀 go-pugleaf

There is an easier way if you clear the options ;)

TOpenDialog* OpenDialog1;
String DlgTitle;
HWND H;

//--------------------------------------------------------------------------
-
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
    //CREATE OPENDIALOG  --------------------------------------------
    OpenDialog1  = new TOpenDialog(this);
    OpenDialog1->Title = "This is the Title";
    DlgTitle = OpenDialog1->Title;
    OpenDialog1->OnShow = OpenDialog1Show;
    OpenDialog1->OnSelectionChange = OpenDialog1SelectionChange;
    OpenDialog1->Options.Clear();
}
//--------------------------------------------------------------------------
-

void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
    OpenDialog1->FileName = "doc.c";

    if (OpenDialog1->Execute())
    {
        // Place your code here
    }
}
//--------------------------------------------------------------------------
-

void __fastcall TForm1::OpenDialog1Show(TObject *Sender)
{
      H = FindWindow(NULL, DlgTitle.c_str());
      MoveWindow(H, 0, 0, 0, 0, false);
}
//--------------------------------------------------------------------------
-

void __fastcall TForm1::OpenDialog1SelectionChange(TObject *Sender)
{
    MoveWindow(H, 0, 0, 800, 300, true);
}
//--------------------------------------------------------------------------
-

"Programming is the art of picking a needle out of a hayheap."  Rodolfo,
2003