FiveTech Software tech support forums

Changed for USE (GetcurDir()+"\Location") ALIAS Location SHARED NEW as per your No. This much work TDatabase itself does automatically. I have some doubts on this. ADO connection is to be created with datapath. For now, ...

OK. The folder was just a phony, it is installed in a correct path. Changed for USE (GetcurDir()+"\Location") ALIAS Location SHARED NEW as per your suggestion. For me did not change anything: still working correctly and as before. Need to consult with the ...

Holá Lucas, Gracias...

PRIVATE cDirPleno := GETCURDIR() // En FHW13.06 FOR XHARBOUR Funciona...

// No uso HARBOUR.
//PRIVATE cDirPleno := hb_dirbase() // Esto no funciona en XHARBOUR debe ser comando de HARBOUR Correcto?

... : warning LNK4006: _HB_FUN_GETCURDIR ya se definió en amedida_fivewinmsvc.lib(varios.obj); segunda definición omitida function GetCurDir() is duplicated in both drives.c and in varios.c (or OBJ). You can not have duplicates. Don't use the /FORCE clause, instead remove each duplicated ...

... "&Fichero Excel" PIXEL SIZE 120,24 OF oWnd FONT oFont ; ACTION ( cFileExcel := cGetFile32( "*.xls", 'Abrir fichero', , GetCurDir(), .F., ,"*.xls" ), ; IF( Empty( cFileExcel ), , ( aoSy[ 1 ]:Refresh(), lFichSub := .T. ) ) ) @ 11,130 SAY aoSy[ 1 ] PROMPT cFileExcel ...

Tim, I don't know, why the brush gets lost. Another solution could be to define the brush LOCAL : FUNCTION Main() LOCAL oBrush2 c_path := GETCURDIR() DEFINE BRUSH oBrush2 FILENAME c_path + "\Images\Stone.bmp" DEFINE WINDOW oWnd TITLE "Testing Brush ... ... DEFINE BUTTON oButt1 ...

... is supported. Just try to recompile. Please check the makefile. I changed the path-define on top to support new FWH-releases like : c_path := GETCURDIR() IF !FILE( c_path + "\NCONVERT.EXE" ) c_path := CURDRIVE() + ":\" + GETCURDIR() ENDIF I'm just working on a update : ...

... // oExcel:Get( "ActiveWorkbook" ):Save() cambiado por: oExcel:ActiveWorkbook:Save() curDrive() cambiado por: hb_curDrive() GetCurDir() ahora devuelve también la letra de la unidad Un campo blob de sqlite devuelve una array en lugar de una cadena como antes. oRs:ActiveConnection(oCon) ...

... lDDirect, nDGradpos, cDBrush, cDImage ), ; oDlg1:Move( 60, 30, oDlg1:nWidth, oDlg1:nHeight, .f. ) ) c_path defines the Aplication-path : c_path := GETCURDIR() // in older FWH-versions => c_path := CURDRIVE() + ":\" + GETCURDIR() A Sample changing the Background : @ 200, 8 SELEX oSelect ...

... Gifs ... --- You can add Your own favorite Websites, if You like. 2. Define of FWH-release for Path-define is not needed anymore added : c_path := GETCURDIR() IF !FILE( c_path + "\SETTING.INI" ) c_path := CURDRIVE() + ":\" + GETCURDIR() ENDIF 3. Some new BMP's added Download ...

... Before You want to create a EXE-file, You have to select the FWH-release because of the change : c_path := GETCURDIR() use in older FWH-versions c_path := CURDRIVE() + ":\" + GETCURDIR() As well You have to select, if You want to create a Dialog ...

Frank, I always use without any Problems : c_path := GETCURDIR() // use in older FWH-versions !!! // c_path := CURDRIVE() + ":\" + GETCURDIR() A image call : DEFINE IMAGE oImage FILE c_path + "\Images\Logo.bmp" or a Button : @ 5, ...

Antonio , Thank you very much for your answer. I had some problems with GetCurDir and changed as : # ifdef FWH12 LOCAL cDir := GetCurDir() + "\" IF ! (cDir=CurDrive()+":\") cDir := CurDrive() + ":\" + GetCurDir() + "\" ...

Rick,

the Download-link of complete Source ( 2.3 MB )

c_path := GETCURDIR()
must be changed, using older FWH-versions to load Images
c_path := CURDRIVE() + ":\" + GETCURDIR()

http://www.pflegeplus.com/fw_downloads/rick2.zip

Best Regards
Uwe

... Array can be : aBtn[5][4] => BTN_UP, BTN_DOWN, BTN_DISABLE , BTN_OVERMOUSE FUNCTION changed in FWH 12.01 !!! ( Drive is included ) c_path := GETCURDIR() + "\" maybe You have to use : c_path := CURDRIVE() + ":\" + GETCURDIR() + "\" http://www.pflegeplus.com/pictures/btnchg.jpg ...