Club Builder

[Jose Antonio]

Alquien sabe como se pueden centrar los cuadros de dialogo comunes de windows tomando como base la ventana de la aplicacion que los llama?

[R. Porcar]

Puedes centrarlos con MessageDlgPos y ShowMessagePos simplemente haciendo un par de calculos con el top y left del formulario y conociendo su altura y anchura (son propiedades básicas del TForm).

int MessageDlgPos(AnsiString Msg, TMsgDlgType DlgType, TmsgDlgButtons Buttons, int HelpCtx, int X, int Y);

y otra forma mas sencillita con:

void ShowMessagePos(AnsiString Texto, int X, int Y);

Roberto Porcar
Club Builder

[Jose Antonio]

Roberto me refiero a los cuadros de dialogo de abrir, guardar, seleccionar colores, etc.

Gracias

[R. Porcar]

Hay algunos cuadros de selección con los que si puedes hacerlo (find y replace):

FindDialog1->Left=10;
FindDialog1->Top=10;
FindDialog1->Execute();

Con los demas no se si heredando o tirando mano del API de win se podra hacer, porque no he visto que tengan métodos para ponerlos en unas coordenadas concretas.

De todas formas, hasta que a alguien se le ocurra una forma mas elegante, mira a ver esto:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
OpenDialog1->Execute();
}
//-------------------------------------------
void __fastcall TForm1::OpenDialog1FolderChange(TObject *Sender)
{
if (OpenDialog1->Tag==0) {
OpenDialog1->Tag=1;
HWND Manejador;
Manejador = GetActiveWindow();
SetWindowPos(Manejador,HWND_TOP, 10,10,430,300,true);
}
}
//-------------------------------------------
void __fastcall TForm1::OpenDialog1Close(TObject *Sender)
{
OpenDialog1->Tag=0;
}

Roberto Porcar
Club Builder