FiveTech Software tech support forums

Thank you. It works perfect.

Just a final adjustement. In xbrowse, showing this datetime field adds .000 to the final time:



What is the picture to supress the final .000, so the vaule would be only:

19-11-2019 20:30.37

Thank you.

Ni idea how to supress that warning...

Regarding reporting it, you will never know it unless you try it

... process: which consists in add new year field modifying database structure. Other (worst) solution is create ~ 30 new years fields at once. It supress database modification. 2. In browse a FOR NEXT iterator, so: FOR nI:= 1980 TO 3000   // H-V   IF FieldPos("Y"+ Str(nI, 4))  ...

Antonio,
I solved my problem when i supress this instruction ==> SkinButtons()

If i d'nt use this function, i have no problem .

Any idea ?

Thanks .

... -d- Search subdirectories -z- Verbose -e Next argument is searchstring -w- Word search -o- UNIX output format Default set: [0-9A-Z_] -q- Quiet: supress normal output -h- Supress display of filename -u xxx Create a copy of grep named 'xxx' with current options set as default A regular expression ...

Hello Joao, Many thanks. Almost done, but I want to supress the Little mark from the Dialog: http://i61.tinypic.com/2hrzo9g.png Thank you. // MBA 24.02.2015#include "FiveWin.ch"#include "constant.ch"#define DTN_FIRST ...

Mr Otto You just need one line        aRec[I] := CharRem( CRLF, aRec[I])  All Chr(13) and all Chr(10) will be removed, even if they are not together. select datenaFldNo := {}AEval( DbStruct(), { |a,i| If( a[ 2 ] $ 'CM', AAdd( aFldNo,...

Hello, is this a good and save way to remove CRLF form database-fields. Thanks in advance Otto select datenaStruc := DBStruct()go topdo while .not. eof()    aRec := getrec()    For I := 1 to len( aRec )        if aStruc[I,2] = "C"        aRec[I&#...

This is only available with xHarbour though? Both Harbour and xHarbour. We need to link \xharbour\lib\ct.lib for xHarbour and \harbour\lib\hbct.lib for Harbour. If we are using fwh, it means we already have these libs included in our link scripts though we might not have noticed. These libs contain...

EMG,

Your computer is fast--2.4 times faster than mine. I get:

3.31
0.03

Either way, charRem() is 100 times faster than strtran().

Thanks Nages.

This is only available with xHarbour though?

Wow! ++++1

But CharRem() function specially made for such purposes and more efficient. You're right! Look at this sample: FUNCTION MAIN()    LOCAL cSpaces := SPACE( 100000000 )    LOCAL nSec := SECONDS()    cSpaces = STRTRAN( cSpaces, " ", &q...

Mr James Elvira's first posting was for removing all spaces. StrTran( cString, ' '. '' ) is correct. But CharRem() function specially made for such purposes and more efficient. Mr Carlos Vargas' posting was to remove duplicate adjacent spaces. I suggested CharOne() for this instead of the code he wa...

Elvira said: Is there a function to remove the intermediate spaces from a string ? Nages said: This is a highly optimized function specially meant for removing adjacent duplicate characters. I took Elvira's statement to mean that he want to remove all spaces, but I admit it is not clear. Removing a...

Esta es una función que cambia espacios de mas de uno a uno. lo uso mucho con instrucciones sql. FUNCTION TrimSpace( cString )   DO WHILE AtNum( "  ", cString ) > 0      cString := StrTran( cString, "  ", " " )   ENDDORETURN cString  For this...