FiveTech Software tech support forums

... lo que mencionaron en ese post, pero no funciona. De antemano gracias. Yo en vez de deshabilitar lo que hago es: oGet:lReadOnly := .T. oGet:lUpdate := .T. y el Tooltip funciona y no permite modificar el oGet.

Hello Anser, Thank you for your help. I looked into the harbour manual, and it seems that LUpdate only gives back date. I need also time. So, I used directory(). All is working fine. Best regards to you and your family Otto https://mybergland.com/fwforum/timestamp.mp4 ...

Hello Anser,
Thank you for your help.
I looked into the harbour manual, and it seems that LUpdate only gives back date. I need also time. So, I used directory().

All is working fine.


Best regards to you and your family
Otto

https://mybergland.com/fwforum/timestamp.mp4

Try
dbInfo(DBI_LASTUPDATE) --> Returns the last date on which the file was updated
The constants are defined in dbinfo.ch

I believe that it is the same as Same as LUpdate()

... :nMarqueeStyle := MARQSTYLE_HIGHLROW :nColDividerStyle := LINESTYLE_NOLINES :nRowDividerStyle := LINESTYLE_NOLINES :lColDividerComplete := .F. :lUpdate := .T. :lRecordSelector := .F. :lHeader := .F. :lHScroll := .F. :nHeaderHeight := 30 :nRowHeight := 85 :bClrHeader := { || { CLR_BLACK, CLR_WHITE ...

... ; "..\bitmaps\off.bmp" ) ) ) METHOD ReDefine( nId, cResName1, cResName2, cBmpFile1, cBmpFile2,; cMsg, bAction, oBar, lAdjust, bWhen, lUpdate,; cToolTip, cPrompt, oFont, cResName3,; cBmpFile3, lBorder , cLayout, cResName4, cBmpFile4, lTransparent,; lRound, bGradColors ) regards uwe :D

... TImage METHOD New( nTop, nLeft, nWidth, nHeight, cResName, cBmpFile, lNoBorder,; oWnd, bLClicked, bRClicked , lScroll, lStretch, oCursor,; cMsg, lUpdate, bWhen, lPixel, bValid, lDesign, cVarName ) CLASS TImage regards Uwe :D Uwe, Sorry on BTnBMP is possible to place sub-images inside on any position ...

... TImage METHOD New( nTop, nLeft, nWidth, nHeight, cResName, cBmpFile, lNoBorder,; oWnd, bLClicked, bRClicked , lScroll, lStretch, oCursor,; cMsg, lUpdate, bWhen, lPixel, bValid, lDesign, cVarName ) CLASS TImage regards Uwe :D

... := TSayBarCode():New( nRow, nCol, bText, cType, oWnd, nWidth, ; nHeight, lPixel, nClrText, nClrBack, ; lVertical, lTransparent, nPinSize, nFlags, lUpdate, lDesign ) - Comando para el control: #xcommand @ <nRow>, <nCol> SAYBARCODE [<oBcd>] TEXT <cText> ; [ TYPE <cType> ...

... := TSayBarCode():New( nRow, nCol, bText, cType, oWnd, nWidth, ; nHeight, lPixel, nClrText, nClrBack, ; lVertical, lTransparent, nPinSize, nFlags, lUpdate, lDesign ) - Command support for control: #xcommand @ <nRow>, <nCol> SAYBARCODE [<oBcd>] TEXT <cText> ; [ TYPE <cType> ...

... ] ; [ <lRight: RIGHT> ] ; [ <lCenter: CENTER> ] ; [ <lNumber: NUMBER> ] ; [ <lUpper: UPPER, UPPERCASE> ] ; [ <lUpdate: UPDATE> ] ; [ WHEN <uWhen> ] ; [ VALID <uValid> ] ; [ <limittext: LIMITTEXT> [ BY <nchars> CHARS ] ] ; [ <cuebanner: ...

... ) - 20 :nMarqueeStyle := MARQSTYLE_HIGHLROW :nColDividerStyle := LINESTYLE_BLACK :nRowDividerStyle := LINESTYLE_BLACK :lColDividerComplete := .T. :lUpdate := .T. :bClrStd := {|| { CLR_BLACK, IIf( oBrowse:KeyNo() % 3 > 0, CLR_WHITE, ; IIf( oBrowse:KeyNo() % 3 = 0 .And. oBrowse:KeyNo() % 2 = 0 ...

In all our controls, we have only bChange and lUpdate. We do not have bUpdate. (TEdit is an exception) The functionality sought to be implemented as bUpdate is better provided to the programmers through bChange. We only take care of changes with ...

... Update or Insert, is same as method Insert with 4th parameter set to .T.) - Enhancement to Method oCn:Insert( cTable, [cFldList], ; aValues, [lUpdate] ) Present beahvior when lUpdate is .T. is that when Primary/Unique key does not exist in the table, the values are inserted and if the key ...

... parameter to decide what to do in case of conflict, i.e., if the ID already exists in the destination table. Set the 4th optional parameter lUpdate to .T.: In this case, if the ID already exists in the destination table, the same row is updated with the values from the source and otherwise ...