Xailer & OZ Software

Una necesidad que tengo, pues no se como solucinarla.
Utilizo TFileOpenDlg correctamente, establezco una carpeta para que sea la
que de entrada esté para seleccionar el archivo.
Bien, pero si quiero que no sea una carpeta, sinó que por defecto entre en
"Mi Pc", debo de pulsar el botón izquierdo que me dirige allí­.
Pues mi consulta...
¿Como puedo hacer para que al abrir el cuadro de diálogo de abrir archivo se
vaya directamente a "Mi Pc"???
Gracias.
Un Saludo,
Xevi.

Xevi,
WITH OBJECT TFileOpenDlg()...
:cInitialDir := GetDrivesFolder()
...
END
Mira con MsgInfo( GetDrivesFolder() ) lo que sale, sólo por curiosidad
Saludos,
José Lalí­n

Pues en principio sale
Compilando FrmMain.prg...
Enlazando XGescontactos.exe...
C:/xDesarrollos/Programas/xGesContactos/Obj/FrmMain.o:(.data +0x2fa8):
undefined reference to `HB_FUN_GETDRIVESFOLDER'
1 Files, 0 Warnings, 1 Errors
Tiempo de compilación: 3.84s Tiempo de enlazado: 1.53s Tiempo total:
5.68s
El 11/06/2014 15:20, José Lalí­n escribió:
> Xevi,
>
> WITH OBJECT TFileOpenDlg()...
> :cInitialDir := GetDrivesFolder()
> ...
> END
>
> Mira con MsgInfo( GetDrivesFolder() ) lo que sale, sólo por curiosidad
>
> Saludos,
> José Lalí­n
>

Bingen,
entonces prueba con DriversFolderGet() y GetFolderDrives()
Saludos,
José Lalí­n

El segundo si que funciona y es el que sale en el manual de Xailer.
> entonces prueba con DriversFolderGet() y GetFolderDrives()
MsgInfo(GetFolderDrives(.T.)) --> Equipo
Pero al igual que otras funciones de ficheros son claras por su nombre,
otras como esta no entiendo que es lo que muestra.
Supongo que buscando información sobre el API habrá mas datos que el
manual de Xailer no?
Gracias.

Bingen,
> Pero al igual que otras funciones de ficheros son claras por su nombre,
> otras como esta no entiendo que es lo que muestra.
sin parámetros muestra el directorio (en este caso virtual) y con .T.
muestra el nombre del directorio.
> Supongo que buscando información sobre el API habrá mas datos que el manual
> de Xailer no?
Las funciones GetFolder...() son wrappers a una función del API más
compleja, por eso se hicieron así­.
Saludos,
José Lalí­n