STRU - Lists and modifies the structure of the dbfs files

[Pablo César]

translate by Goggle, add to project with a little not :

Sorry, I am not sure what you tried to say with "not"...

But I think, translations is going to happen according need of each different user in language. I think STRU is as free software, all of us are involved to grow up together with all demands. The primary language in English as universal one is already, the rest is invited to everyone for participating without any obligation or responsibility to provide.

I kindly request to others for your participation if is considered for your use and wants to share with everybody and contributing with the rest of missing translations.

This isn't my native language; I'm waiting for your critics, corrections, etc. More useful: a full text translated

If you are referring to your English translation that you have indicated, let say that I also considered as correct because at beginning I had translated quite similar than your, but Jairo Maia says that was changed the meaning when he wrote in portuguese. So then I changed back and I said that in others languages sometimes differe when texts are translated comparing other language.

But please feel you and anyone comfortable who wants to realize translations, is a friendly contribution.

[esgici]

Ola Pablo

Sorry, I am not sure what you tried to say with "not"...

As already mentioned, my English isn't good It must be "note"

But please feel you and anyone comfortable who wants to realize translations, is a friendly contribution.

I'm sure that in both HMG Forum and Clipper On Line forum we have too many friends who could this participation; especially Spanish translation will be easy for most of members

Relação

[Pablo César]

Stru, ahora en Español !

<Attached file removed, see last message with now release>

[esgici]

Great !

Thanks

[Pablo César]

Great !

Thanks

Thanks, amigo !

I was thinking and let me know your opinion. Help option is too much laborious and I decided to cut off and giving space for some config options, like as:

- I used to put STRU.EXE in the path. Mostly I have used in C:\WINDOWS\SYSTEM32 which I am right that it can be run-able at any where. So, supposing that we are able to run STRU in line command from anywhere, precisely where the dbfs are. Then in this case the application must find Lng files for languages without to make several copies in the each folders. So if I save the path where the Lng files are.
- Other option is to give a chance to user to select language available by setup.
- Another option is to let it fixed or let for user choose about DBF format (Clipper or Harbour/FoxPro).

I think these three options could be implemented, have you other ideas for setup options ?(Please, being not so much toilsome)

[esgici]

I was thinking and let me know your opinion. Help option is too much laborious and I decided to cut off and giving space for some config options, like as:

- I used to put STRU.EXE in the path. Mostly I have used in C:\WINDOWS\SYSTEM32 which I am right that it can be run-able at any where. So, supposing that we are able to run STRU in line command from anywhere, precisely where the dbfs are. Then in this case the application must find Lng files for languages without to make several copies in the each folders. So if I save the path where the Lng files are.
- Other option is to give a chance to user to select language available by setup.
- Another option is to let it fixed or let for user choose about DBF format (Clipper or Harbour/FoxPro).

I think these three options could be implemented, have you other ideas for setup options ?(Please, being not so much toilsome)

Ola Pablo

All of your planned extensions are good and useful.

You remembered me another speech of my teacher : "A computer program never ends; only a point of development we begin use it."

My humble opinion is:

By considering users of this program will be programmers, all of above extensions you are thinking, will be easily realize by your user.

So another programmer's proverb is : "if works, don't touch ( play ) it !"

Surely, this is your project and decision is your right; for me there isn't any addition required

Regards

[Pablo César]

Thanks Mr. Esgici for your prompt reply.

"if works, don't touch ( play ) it !"

Yes I know, but Help option was outdated (always needing to be updated when implements are made) and as you already said, STRU´s user are developers so I think help is not much needed. And I have this problem when STRU is executing out of folder where STRU.EXE is, then LNG also will not found if is not recorded in an INI file for example.

[esgici]

Ola Pablo

I have bad news

We have a problem on language files and / or its implementation

English and Portuguese are OK; but Spanish and Turkish give this error :

Error BASE/1449 Syntax error: &
Called from LE_LNG(2298)
Called from MAIN(34)

Erroneous line is :

Code: Select all

         Aadd( aLinha,&(cLinha))

I don't know why this macro substitution is required. But without it no error occured:

Code: Select all

         Aadd( aLinha, cLinha )

Also I don't understood why we need enclosed by quotation mark lines of .lng file

... I have this problem when STRU is executing out of folder where STRU.EXE is, then LNG also will not found if is not recorded in an INI file for example.

I suggest a little function for this purpose.

But first I must warn you: this function will make unnecessary your two valuable low-level functions : Le_Lng() and LinhaArq()

Anyway I hope that it will give an idea for implementation of .exe and .lng files in separate folders.

Code: Select all

FUNCTION MakeLangArry()

   LOCAL aRetval
   LOCAL cExeFName := ExeName()
   LOCAL cExeFPath := LEFT( cExeFName, RAT( "\", cExeFName ) )  
   LOCAL cLanguage := IF( FILE( cExeFPath + IDIOMA + ".Lng" ), IDIOMA, "English" ) 
   LOCAL cLangFNam := cExeFPath + cLanguage + ".Lng"

   IF FILE( cLangFNam )
      aRetval := HB_ATOKENS( MEMOREAD( cLangFNam ), CRLF )
   ELSE
      MsgStop( cLangFNam + CRLF +;
               "Language file not found !" + CRLF + CRLF + ;
               "Program terminated ! ", "E R R O R !" )
      QUIT               
   ENDIF

RETURN aRetVal // MakeLangArry()

For use / test this function :

Code: Select all

/*
If File(IDIOMA+".Lng")
   aLng := Le_Lng(IDIOMA+".Lng")
Else
   aLng := Le_Lng("English.Lng")
Endif
*/

aLng := MakeLangArry()

Relação

[Pablo César]

Error BASE/1449 Syntax error: &
Called from LE_LNG(2298)
Called from MAIN(34)

Yes Mr. Esgici, I had make a little mistake in Spanis.Lng line 30 where had been "Sobre-escribir el archivo: "; and already corrected which must be like this: "Sobre-escribir el archivo: ;" (please note red color character).
Sorry ( my blame ), I have noted, corrected and uploaded at this post but it was too late, seems you have download before my corrections. Please download again stru.rar and check your Lng turkish file.

Also I don't understood why we need enclosed by quotation mark lines of .lng file

Because it is so necessary to keep spaces characters and with quotes it help to keep it. just to keep some concatanations proposes.

I must warn you: this function will make unnecessary your two valuable low-level functions : Le_Lng() and LinhaArq()

Very simplified and good code in your indication. I loved your indication: aRetval := HB_ATOKENS( MEMOREAD( cLangFNam ), CRLF ) Thanks I will re-evaluate for implement and revert.

... I have this problem when STRU is executing out of folder where STRU.EXE is, then LNG also will not found if is not recorded in an INI file for example.

I suggest a little function for this purpose.

Brillant your code-example ! Thanks again.

[Pablo César]

We have a problem on language files..//..

..//..and Turkish give this error

Please download again stru.rar and check your Lng turkish file.

Please Mr. Esgici, see you Turkish file in line 121, it is missing last quote.

I have some more itens to be replaced and to append LNG files. Routine for user changing language and for RDD default, is quite ready. I'll release soon.