🚀 go-pugleaf

> Here's a page that simply answers your question:
> http://thunder.prohosting.com/~cbdn/cd002.htm

That won't work. Can I suggest the following modification to the code
shown on the above link:

#include <vcl.h>
#pragma hdrstop

#include "MoveWindow.h"
//--------------------------------------------------------------------------
-
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
TOpenDialog* OpenDialog1;
String DlgTitle;

//--------------------------------------------------------------------------
-
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
    //CREATE OPENDIALOG  --------------------------------------------
    OpenDialog1  = new TOpenDialog(this);
    OpenDialog1->Title = "Title";
    DlgTitle = OpenDialog1->Title;
    OpenDialog1->OnShow = OpenDialog1Show;
}
//--------------------------------------------------------------------------
-

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

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

void __fastcall TForm1::OpenDialog1Show(TObject *Sender)
{
    TRect rect;
    HWND H = GetParent(dynamic_cast<TOpenDialog*>(Sender)->Handle);

    GetWindowRect(H, &rect);

    MoveWindow(H,
                           0,   // put your coordinate here as required
                           0,   // put your coordinate here as required
                           rect.right - rect.left,
                           rect.bottom - rect.top,
                          true);

    Abort();
}

Ah, by the way a short message for Remy: here there is no flickering
and also this is the simplest solution :-)

Rodolfo