Powerbasic Museum 2020-B

IT-Consultant: Patrice Terrier => Addon tools for PB => Topic started by: Patrice Terrier on April 27, 2009, 08:22:42 PM

Title: zHelpAPI (version 1.01)
Post by: Patrice Terrier on April 27, 2009, 08:22:42 PM
zHelpAPI is a new "On line" utility to check the syntax and the purpose of a specific SDK API.

It is based on the excellent José Roca's API documentation and his WebBrowser example.

I have added the combobox and all the code that would parse the URL to find and display the API documentation.

I wrote this project in a short delay, thus i didn't had much time to test it, let me know if you find anything wrong.

(http://www.zapsolution.com/pictures/zHelpAPI.jpg)

...

Title: Re: zHelpAPI (version 1.00)
Post by: Patrice Terrier on April 28, 2009, 10:43:33 AM
The initial purpose of this project was to add online API documentation in SED.

Things to do:
- Add another combobox or tree index, to choose available urls for other reference guides.
- Add a refresh button to download the lattest html index from the web.


Decoding of the Java script to get the URLs being stored in the hidden listbox.

          sUrlPathToUse = "http://www.jose.it-berater.org/gdi/"
          sLocalFile = zGetTempPath + "zHelpIndex.htm"
          IF NOT ISFILE((sLocalFile)) THEN
             Done = zDownloadFile(sUrlPathToUse + "iframe/tree.htm", (sLocalFile))
          ELSE
             Done = -1
          END IF
          IF Done THEN
             CALL zSetBufinChar(CHR$(10))
             Done = 0
             DO WHILE Done = 0
                sCfg = RTRIM$(LTRIM$(zBufin((sLocalFile), Done)), ");")
                IF INSTR(LCASE$(sCfg), "tree.add(") = 0 THEN
                   sCfg = ""
                ELSE
                   sCfg = MID$(sCfg, 10)
                   IF PARSE$(sCfg, 2) < "1100" THEN sCfg = ""
                END IF
                IF LEN(sCfg) THEN
                   sAPI = TRIM$(PARSE$(sCFg, 3), "'")
                   sLink = TRIM$(PARSE$(sCfg, 4), "'")
                   Replace "../" WITH sUrlPathToUse IN sLink
                   IF LEN(sLink) THEN
                      CALL SendMessage(GetDlgItem(hWnd, %ID_COMBOBOX), %CB_ADDSTRING, 0, STRPTR(sAPI))
                      CALL SendMessage(GetDlgItem(hWnd, %ID_LISTBOX), %LB_ADDSTRING, 0, STRPTR(sLink))
'//                   zTrace((sAPI + ", " + sLink))
                   END IF
                END IF
             LOOP


...
Title: zHelpAPI (updated to version 1.01)
Post by: Patrice Terrier on April 28, 2009, 07:25:03 PM
zHelpAPI, has been updated to version 1.01.

What is new:
- Added a resource manifest to use XP/VISTA theme style.
- Added button "Update" to download the latest Index from the internet.

The new ZIP file is attached to the first post of this thread.

...
Title: Re: zHelpAPI (version 1.01)
Post by: Petr Schreiber on May 02, 2009, 08:49:07 PM
Thanks Patrice,

this is very useful, I am tired of MS HLP, this looks much better.
Is this what was announced with the SDK banner few days ago?


Petr
Title: Re: zHelpAPI (version 1.01)
Post by: Patrice Terrier on May 02, 2009, 09:03:33 PM
Petr,

Yes, it is.

...
Title: Re: zHelpAPI (version 1.01)
Post by: Patrice Terrier on August 10, 2011, 12:46:24 PM
The first post of this thread has been updated, to fix the ZIP file corruption caused by the "Server Collapse".

...