FiveTech Software tech support forums

... Menu"+SPACE(21)mm_choice = ACHOICE(5,10,8,70,mchoice)DO CASECASE mm_choice = 1 .OR. mm_choice = 2IF mm_choice = 2DELETE FILE &mm_txtfile.ENDIFsavefile = mm_memfile* Release all the variables used in this program and save* the variables that were assigned value in the editor.RELEASE ALL LIKE mm ...

Antonio:

No, lo lamento, solo cite y no vi a que foro caia, solo con FWH, pero necesito esa apariencia del botón.

Saludos

Armando,

te refieres usando FiveMac ?

Hello Manuel,

Thank you for this guideline. Very simple to implement and it's working great. Instead of de.lproj I used nl.iproj to show every menu in Dutch.

P.S. I am addepting my program with the new print functions and they are also working perfect. As soon as I am ready with all the changes, I ...

Rene , I found a solution



see your app ....
mouse right button -> show package content
create a directory in app-> Contents-> Resources called de.lproj.


ready.

Hello,

I found the SaveFile() function and it is usefull for me. But how can I set this function to show the screen on Dutch, like my Mac? Now it is in English

* Fixed some bugs on OpenFile() and SaveFile()

* Fixed some bugs in function FillFuncList()

* Added support for #xcommand in function FillFuncList()

... by FiveTech.

* New: DATEPICKER implementation. Please review samples/TestDPik.prg, thanks
to Dino. Revised by FiveTech.

* New: function SaveFile(), lets you select the name of the file to save.
Thanks to Manuel!

* New: Class TWBrowse Methods SetRowHeight( nHeight ), GetRowHeight() and ...

... by FiveTech.

* New: DATEPICKER implementation. Please review samples/TestDPik.prg, thanks
to Dino. Revised by FiveTech.

* New: function SaveFile(), lets you select the name of the file to save.
Thanks to Manuel!

* New: Class TWBrowse Methods SetRowHeight( nHeight ), GetRowHeight() and ...

... save use the third parameter in the method SaveAs of WorkBook object

FUNCTION MAIN()
LOCAL oExcel := CREATEOBJECT( "Excel.Application" )
LOCAL oWorkbook := oExcel:Workbooks
LOCAL oSheet := oExcel:ActiveSheet
...
savefile := oWorkbook.SaveAs( fileXL, ,"YourPassWord" )
...
RETURN NIL

... busca2Script(UNO,DOS)) ;
VALID (IIf(oMemo:lChanged .and. ;
MsgYesNo("Source code has changed, Save changes?",;
"Script Source code"),;
SaveFile(), ),;
SetWinCoors(odlge, cIniFile),;
oDlg == Nil)


RETURN nil


//27/06/2005 ...

... busca2Script(UNO,DOS)) ;
VALID (IIf(oMemo:lChanged .and. ;
MsgYesNo("Source code has changed, Save changes?",;
"Script Source code"),;
SaveFile(), ),;
SetWinCoors(odlge, cIniFile),;
oDlg == Nil)


RETURN nil


//27/06/2005 ...

Rolando, muchas gracias.

El link a SAVEFILE que aparece en el tópico que me indicas, me da "página no presente", por lo que no tengo el código. Sí he visto las imágenes y es lo que necesito.

Gracias y un saludo.

Tim,

here a link to download

http://www.savefile.com/files/875681

regards
Paco

disculpas a todos,

no la habia subido, aqui esta a su disposicion la wbrowse de HDC con las adaptaciones que hice, yo la uso con harbour, no la he probado con xharbour.

m

salu2
paco

Francisco,

Gracias por tu espléndido aporte, te confirmo que funciona de maravillas con xHarbour y que los ...