FiveTech Software tech support forums

... DirName()->cDirectory DirRemove(<cDirectory>)->nOSError DisableWaitLocks([<lNewMode>])->lOldMode DiskChange(<cDrive>)->lSuccess DiskFree([<cDrive>])->nFreeDiskSpace DiskName()->cDrive DiskReady([<cDrive>],[<lOSErrorMsg>])->lDriveIsReady ...

... DefPath Deleted DeleteFile Descend DevOut DevOutPict DevPos DirChange Directory DirectoryRecurse DirMake DirName DirRemove DisableWaitLocks DiskChange DiskFree DiskName DiskReady DiskReadyW DiskSpace DiskTotal DiskUsed DispBegin DispBox DispCount DispEnd DispOut DllCall DllExecuteCall DllLoad ...

EXPORTS HB_FUN_AADD @1 HB_FUN_ABS @2 HB_FUN_ACCELERATO @3 HB_FUN_ACCELERATOR @4 HB_FUN_ACHOICE @5 HB_FUN_ACLONE @6 HB_FUN_ACOPY @7 HB_FUN_ADEL @8 HB_FUN_ADIR @9 HB_FUN_AEVAL @10 HB_FUN_AFIELDS @11 HB_FUN_AFILL @12 HB_FUN_AINS @13 HB_FUN_ALERT @14 HB_FUN_ALIAS @15 HB_FUN_ALLTRIM @16 HB_FUN_ALTD @17 H...

Antonio
Complemento mi post previo. Diskchange se encuentra en el archivo Disc.c de la carpeta Sources/function de Fwh.
Saludos

Antonio Estuve revisando el codigo fuente de harbour y noté que en la librería hbrtl ya se encuentra registrado la función DISKCHANGE. Eso puede resultar en un error de linkeo ya que en la fuente de Fwh también se encuentra la misma función. Esto se hará visible cuando se utilice Mingw ...

... Fix: There was a memory leak in Class TPrinter Method End() cause PrinterEnd() was commented out. Now it is ok. * Enhancement: We remove function DiskChange() from FWH in order to use Harbour's DiskChange() * Enhancement: We remove function DriveType() from FWH in order to use Harbour's DriveType() ...

Antonio, Just for revision. Those are duplicate warnings: fiveh32.lib(HARBOUR.obj) : warning LNK4006: _HB_FUN_LOADLIB32 ya se definió en fivehc32.lib(CALDLL32.obj); segunda definición omitida fiveh32.lib(HARBOUR.obj) : warning LNK4006: _HB_FUN_FREELIB32 ya se definió en fivehc32.lib(CALDLL32.obj); s...

Lucas,

Removed function DiskChange() from FWH. We use now Harbour's DiskChange()

Olvide,

Para cambiar la unidad actual usa la funcion diskchange

DiskChange()


Slds

Michel, function DiskChange() is just a wrapper to Windows API SetCurrentDirectory(). Nothing has changed there so it should work fine: HB_FUNC( DISKCHANGE ) // ( cDrive ) --> lSuccess{   hb_retl( SetCurrentDirectory( ...

... error : Unresolved external symbol '_SendInput referenced from Fivehcm.lib (KEYBRD.OBJ)' I also noticed the problem in FWH 11.09. The function DiskChange() doesn't seem to work anymore. If I rebuild my application in FWH 11.08, everything is working fine. Anyone any idea about a solution for ...

Me explico. Tengo una aplicación que esta en [c:] en el directorio [prueba] Cambio a un directorio que cuelga de este llamado [prueba2], posteriormente me cambio a la unidad [z:], cual es mi sorpresa, que cuando cambio a [c:] estoy en [prueba] y no en [prueba2]. Tengo un aplicación que trabaja en 1...

Me explico. Tengo una aplicación que esta en [c:] en el directorio [prueba] Cambio a un directorio que cuelga de este llamado [prueba2], posteriormente me cambio a la unidad [z:], cual es mi sorpresa, que cuando cambio a [c:] estoy en [prueba] y no en [prueba2]. Tengo un aplicación que trabaja en 16...

... // cName := HB_OemToAnsi( cName ) cCurDir := UPPER( CURDIR() ) IF ( cWorkingDir := CURDRIVE() ) == "\" cWorkingDir := MapToNextDrive( @cCurDir ) DiskChange( cWorkingDir ) cWorkingDir += "\" + cCurDir + "\" ELSE cWorkingDir += ":\" + cCurDir + "\" ENDIF TRY oShell := CreateObject( "WScript.Shell" ...