FiveTech Software tech support forums

Dear Master Rao,

This issue is FW_SetUnicode(.F.) is not the same behavier as ANSI (do not declare FW_SetUnicode).
K.Surasak,
What is chr(202)+chr(161) represent for (which character in Thai) ?

Thai characters 202,161 are
ส, ก

Thai language in (TIS620) ascii table has not 2 bytes character ...

... lines?


nTipo =1

https://i.postimg.cc/J72hLLF6/primo.png

ntipo =2

https://i.postimg.cc/TPfd9Yyw/secondo.png



when I set ntipo1 I declare local aTabella := array(101, 11)

when I set ntipo2 I declare local aTabella := array(10, 11)


I tried to set local aTabella :={} for all types ...

If I load a variable as

&cVarName := cVarValue

I must declare before cvarname ?

I explain you

I take the variables from a extern file sample


FUNCTION ReadFile()
local cFileName := "table_1.dat"
local aInfo := ReadProtectedFile(cFileName)
local aItem,cVarName,cVarValue

FOR EACH aItem IN ...

You have to declare LOCAL hHandle and LOCAL hResult.

... FUNCTION Santi1( oCn, oCn2 )
LOCAL cSql2, oRs2, wfecha

wfecha:='20240723'

cSql2 := "declare @fecha char(8) = '" + wfecha + "' " + CRLF + ;
"select m1.tropanumero as tropa, m1.correlativo, m1.kilos+isnull(m2.kilos,0) as kilos, " + CRLF ...

I like everything correct: How do I declare, NINDEX?

Me gusta todo correcto: ¿Cómo declaro, NINDEX?

Gracias, tks.

Regards, saludos.

Hello.
You declare the objects as Nil and the Garbage harbor system will automatically unload them if they do not have memory links.
oHttp := Nil
oReq := Nil

To terminate the Chilkat control Handle initiated by the GLOBAL Resource use Method FinalizeThreadPool()

The prg below is used for ...

Dear Silvio,

Please post the source of ut_images.prg

In the meantime, please declare those missing functions as dummy:

function BetaVersion() ; return nil

I allready make
function BetaVersion() ; return nil
function setmasked() ; return nil
function showgrid() ; return nil

But I not ...

Dear Silvio,

Please post the source of ut_images.prg

In the meantime, please declare those missing functions as dummy:

function BetaVersion() ; return nil

/a /m /n /gc3 /w3 /es2


Using these FLAGS, the compiler does not miss any error COMMAS, if you declare a variable and do not use it, the compilation will not pass. Incredible. It's a lot of work, but it's worth it, as your code is super clean of errors.

Usando estas BANDERAS el compilador no ...

/a /m /n /gc3 /w3 /es2


Using these FLAGS, the compiler does not miss any error COMMAS, if you declare a variable and do not use it, the compilation will not pass. Incredible. It's a lot of work, but it's worth it, as your code is super clean of errors.

Usando estas BANDERAS el compilador no ...

Enrico, it works too. But you have to change the way you DECLARE the VARIABLES. For example, it does not accept PUBLIC.

Enrico, también funciona. Pero hay que cambiar la forma de DECLARAR las VARIABLES. Por ejemplo, no acepta PUBLIC.


%hdir%\bin\harbour %1 /m /n /gc3 /w3 /es2 /i%fwh%\include;%hdir ...

... 4002, "Static", SS_RIGHT|WS_GROUP, 1, 56, 72, 8
}

Antonio, that's right.
I'm going to improve my application's skin routine.
As we often do not declare "STATIC" controls, which would be SAY in FWH, I needed to know how to find the IDs of these controls.
When it's ready I'll post the class and an ...

... ChatGPT
You're right, my mistake. In Harbour, the correct syntax to end a function is RETURN for the function's return value and FUNCTION to declare the end of the function, not ENDFUNCTION as I previously stated. Here's the corrected code:

harbour
Copy code
FUNCTION SplitAddress(cAddress ...

Gracias por responder, no me estaba funcionando el timer, lo declare así:

ACTIVATE DIALOG oDlg ON INIT ( oDlg:SetPos( 0, 0 ), oDlg:nWidth := GetSysMetrics( 0 ), oDlg:nHeight := GetSysMetrics( 1 ), BuildTimer( oDlg, obrow ))

function BuildTimer( oDlg, wobrow )
local oTmr
DEFINE TIMER oTmr OF oDlg ...