FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Need Help guide for my program.
Posts: 9022
Joined: Thu Oct 06, 2005 08:17 PM

Re: Need Help giide for my program

Posted: Sat Jul 20, 2024 09:48 AM
Enrico wrote:I use it every day but the answers are always useless. I hope it will improve in the future.
Please take a look at the answer.
I can't say more: I always get useless responses.
Posts: 1772
Joined: Thu Sep 05, 2019 05:32 AM

Re: Need Help giide for my program

Posted: Sat Jul 20, 2024 01:35 PM
hi,
Enrico Maria Giordano wrote:I use it every day but the answers are always useless.
i won´t say that Answer from ChatGPT is useless.

it is true that ChatGPT can´t do your JOB and write full working CODE for You.
but ChatGPT can give You a Idea what to do.
greeting,

Jimmy
Posts: 9022
Joined: Thu Oct 06, 2005 08:17 PM

Re: Need Help giide for my program

Posted: Sat Jul 20, 2024 01:57 PM
Jimmy wrote:hi,
I use it every day but the answers are always useless.
i won´t say that Answer from ChatGPT is useless.

it is true that ChatGPT can´t do your JOB and write full working CODE for You.
but ChatGPT can give You a Idea what to do.
I never ask AI to do my work. I only ask it some little questions about various problems I face and the responses are unavoidably almost useless.
Posts: 2706
Joined: Fri Oct 07, 2005 01:50 PM

Re: Need Help giide for my program

Posted: Sat Jul 20, 2024 02:50 PM

To All

I think of AI as the HAL voice on 2001 a Space Odyssey .. "Open the Pod bay Doors HAL" ...... "Sorry Dave, I can't do that" ...... the experiences of life is the best teacher and Wisdom is learned and not an answer rolled up in AI... Sorry if my answer seems ugly ..

Rick Lipkin

Posts: 9022
Joined: Thu Oct 06, 2005 08:17 PM

Re: Need Help giide for my program

Posted: Sat Jul 20, 2024 02:55 PM

Rick,

the AI answer is exclusively based on the data found on the search engines, there is no reasoning in there, only a dumb report with a decent grammatical form, nothing more. At least at this time. We will see (and hope!) in the future.

Posts: 9022
Joined: Thu Oct 06, 2005 08:17 PM

Re: Need Help giide for my program

Posted: Sat Jul 20, 2024 03:57 PM
To be honest, I just receive an useful answer! :-)
What is the classname of thunderbird.exe?

The classname for the main window of Thunderbird is typically "MozillaWindowClass".
Posts: 6984
Joined: Fri Oct 07, 2005 07:07 PM

Re: Need Help giide for my program

Posted: Sat Jul 20, 2024 04:32 PM
Dear Enrico,
Prompt engineering is crucial. The better you post your question the better the answer.
I made a Prompt Editor for creating my PROMPTS.
Best regards,
Otto




Look at the answer I got:





Your answer:



Posts: 6984
Joined: Fri Oct 07, 2005 07:07 PM

Re: Need Help giide for my program

Posted: Sat Jul 20, 2024 04:40 PM
... and if you want source example for HARBOUR


Posts: 6984
Joined: Fri Oct 07, 2005 07:07 PM

Re: Need Help giide for my program

Posted: Sat Jul 20, 2024 04:58 PM
... and here the running app




Posts: 9022
Joined: Thu Oct 06, 2005 08:17 PM

Re: Need Help giide for my program

Posted: Sat Jul 20, 2024 05:49 PM
Otto,

I just resumed the answer deleting useless things like the pseudocode. Unfortunately, the answer is not what I was looking for. The class "MozillaWindowClass" is only for the main Thunderbird window. I need the one for the compose dialog... :-(
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

Re: Need Help giide for my program

Posted: Sat Jul 20, 2024 07:50 PM

Dear Enrico,

> I need the one for the compose dialog...

Can you please explain what you need ? thanks

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 9022
Joined: Thu Oct 06, 2005 08:17 PM

Re: Need Help giide for my program

Posted: Sat Jul 20, 2024 07:52 PM
Code (fw): Select all Collapse
? FINDWINDOW( "the compose dialog of Thunderbird classname" )
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

Re: Need Help giide for my program

Posted: Sat Jul 20, 2024 08:11 PM

Is it the title of the dialog ?

Do you get a valid handle ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 9022
Joined: Thu Oct 06, 2005 08:17 PM

Re: Need Help giide for my program

Posted: Sat Jul 20, 2024 08:56 PM
No, it is not:
Code (fw): Select all Collapse
FINDWINDOW( "classname", "window title" )
Anyway, never mind, I already solved using the window title.
Posts: 6984
Joined: Fri Oct 07, 2005 07:07 PM

Re: Need Help giide for my program

Posted: Sat Jul 20, 2024 10:22 PM
Enrico, does this work?
Code (fw): Select all Collapse
#include "FiveWin.ch"

// Define necessary constants
#define GW_CHILD       5
#define GW_HWNDNEXT    2

FUNCTION Main()
    LOCAL aWindows := {}
    LOCAL cName := ""
    LOCAL hwnd := GetWindow( GetDesktopWindow(), GW_CHILD )
    LOCAL cClassName := Space( 256 )
    LOCAL cClassNameMain := "MozillaWindowClass"  // Class name for the main Thunderbird window
    LOCAL hwndMain, hwndChild, cClassNameChild

    // Iterate through all windows to find the main Thunderbird window
    WHILE hwnd != 0
        cName := GetClassName( hwnd, @cClassName, Len( cClassName ) )
        IF Len( cName ) > 0
            cName := Left( cName, Len( cName ) )
            IF cName == cClassNameMain
                // Now iterate through child windows of the main Thunderbird window
                hwndChild := GetWindow( hwnd, GW_CHILD )
                cClassNameChild := Space( 256 )
                WHILE hwndChild != 0
                    cName := GetClassName( hwndChild, @cClassNameChild, Len( cClassNameChild ) )
                    IF Len( cName ) > 0
                        cName := Left( cName, Len( cName ) )
                        IF cName == "MozillaCompositorWindowClass"
                            AADD( aWindows, { hwndChild, cName } )
                        ENDIF
                    ENDIF
                    hwndChild := GetWindow( hwndChild, GW_HWNDNEXT )
                ENDDO
            ENDIF
        ENDIF
        hwnd := GetWindow( hwnd, GW_HWNDNEXT )
    ENDDO

    // Display the results
    xbrowse(aWindows)

    RETURN NIL