FiveTech Software tech support forums

... cSecondLine := " "
DEFAULT cThirdLine := " "
DEFAULT cImageFileName := "c:\fwh\bitmaps\pngs\fivetech.png"

RoInitialize( 1 )

// Create XML document instance
pString = WinRTString( "Windows.Data.Xml.Dom.XmlDocument" )
RoActivateInstance( pString, @pXml )
WindowsDeleteString( pString ...

... cSecondLine := " ", cThirdLine := " ",;
cImageFileName := "c:\fwh\bitmaps\pngs\fivetech.png"

RoInitialize( 1 )

// Create XML document instance
pString = WinRTString( "Windows.Data.Xml.Dom.XmlDocument" )
RoActivateInstance( pString, @pXml )
WindowsDeleteString( pString ...

Otto,

That is very nice ... but as far as I can see, 24.12 has not been released so I don't have access to that functionality.

When I do, HTML would be nice because it is easy to import into Help and Manual to make a true document.

... Unlocks the browse control, allowing data modifications.

Parameters: None

Return Value: LOGICAL - Returns NIL always (likely a typo in original documentation, should probably be .T. on success).

Usage Example:

oBrw:UnLock()
content_copy
download
Use code with caution.
Harbour

146. SaveData ...

agentdoc2.prg is a new example using AI included in next FWH build soon to be published

Yes!

... DBFCDX

function Main()

local aFiles := Directory( "c:\fwh\source\classes\*.prg" )
local oChat := TDeepSeek():New(), aFile
local cPrompt := "document this code, explaining what this Class is about," + ;
" listing all the DATAs and METHODs," + ;
" and providing a brief description of each of ...

Dear Antonio,
and the challenge afterward is to manage this information.

I have been working on a comprehensive DMS for a long time. That’s why I often contribute opinions suggesting that the filesystem serves as a database and some form of DBFs as content directories.
I cannot imagine that the ...

... DBFCDX

function Main()

local aFiles := Directory( "c:\fwh\source\classes\*.prg" )
local oChat := TDeepSeek():New(), aFile
local cPrompt := "document this code, explaining what this Class is about," + ;
" listing all the DATAs and METHODs," + ;
" and providing a brief description of each of ...

... BLACK
oBar:Adjust()

END

DEFINE BUTTON OF oBar FILENAME "..\bitmaps\16x16\new.bmp" FLAT ;
ACTION MsgInfo( "New" ) ;
TOOLTIP "Creates a new document"

DEFINE BUTTON OF oBar FILENAME "..\bitmaps\16x16\open.bmp" FLAT ;
ACTION MsgInfo( cGetFile( "*.*", "Select a document to open" ) ) ;
TOOLTIP ...

... 3D SIZE 26, 27 OF oWnd

DEFINE BUTTON OF oBar FILENAME "..\bitmaps\16x16\new.bmp" FLAT ;
ACTION MsgInfo( "New" ) ;
TOOLTIP "Creates a new document"

DEFINE BUTTON OF oBar FILENAME "..\bitmaps\16x16\open.bmp" FLAT ;
ACTION MsgInfo( cGetFile( "*.*", "Select a document to open" ) ) ;
TOOLTIP ...

... F.)

>

if len(aParams)>0

cIdenti := alltrim(aParams[1])
cDian := "consultaDIAN( '"+cIdenti+"' )"

TEXT INTO cResult
var inputEstado = document.getElementById('vistaConsultaEstadoRUT:formConsultaEstadoRUT:estado');
if (inputEstado) {
var inputNIT = document.getElementById ...

Otto,

Ok, but what text in the code you must select in order to get this data ?

@ 05, 05 SAY "Document" SIZE 150, 20 OF oFld2:aDialogs[FOLDERDOC_INFO] PIXEL FONT oBoldLarge COLORS CLR_BLUE, CLR_WHITE TRANSPARENT UPDATE

@ 05, 55 get oDoc VAR h_ingeven["DOCNUMMER"] SIZE 35,14 PIXEL OF oFld2:aDialogs ...

Dear Maurizio,

Thank you very much. I will take a look at the document.

Best regards,
Otto