Rocksolid Light

Welcome to RetroBBS

mail  files  register  newsreader  groups  login

Message-ID:  

You can observe a lot just by watching. -- Yogi Berra

devel / comp.lang.xharbour / xHarbour.com version and HWGUI source

SubjectAuthor
* xHarbour.com version and HWGUI sourceGary Williams
`* Re: xHarbour.com version and HWGUI sourceEnrico Maria Giordano
 `* Re: xHarbour.com version and HWGUI sourceEnrico Maria Giordano
  `- Re: xHarbour.com version and HWGUI sourceGary Williams

1
xHarbour.com version and HWGUI source

<241bbfe1-6fb1-4326-8c12-fce6a1f5c29en@googlegroups.com>

  copy mid

https://www.rocksolidbbs.com/devel/article-flat.php?id=16887&group=comp.lang.xharbour#16887

  copy link   Newsgroups: comp.lang.xharbour
X-Received: by 2002:a05:622a:44e:: with SMTP id o14mr2598043qtx.369.1640282916791;
Thu, 23 Dec 2021 10:08:36 -0800 (PST)
X-Received: by 2002:ae9:efc1:: with SMTP id d184mr2202100qkg.707.1640282916558;
Thu, 23 Dec 2021 10:08:36 -0800 (PST)
Path: i2pn2.org!i2pn.org!kf5zxw.com!weretis.net!feeder6.news.weretis.net!news.misty.com!border2.nntp.dca1.giganews.com!border1.nntp.dca1.giganews.com!nntp.giganews.com!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.lang.xharbour
Date: Thu, 23 Dec 2021 10:08:36 -0800 (PST)
Injection-Info: google-groups.googlegroups.com; posting-host=2601:781:8100:3b4:894e:ffb3:5fc4:c6c8;
posting-account=HHEq4woAAADnwl5Ihl-uo-jF2A6Q7gZD
NNTP-Posting-Host: 2601:781:8100:3b4:894e:ffb3:5fc4:c6c8
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <241bbfe1-6fb1-4326-8c12-fce6a1f5c29en@googlegroups.com>
Subject: xHarbour.com version and HWGUI source
From: gary.l.williams@gmail.com (Gary Williams)
Injection-Date: Thu, 23 Dec 2021 18:08:36 +0000
Content-Type: text/plain; charset="UTF-8"
Lines: 17
 by: Gary Williams - Thu, 23 Dec 2021 18:08 UTC

HWGUI source does not compile cleanly under the last release of xHarbour.com base release, from what I can tell partly due to code blocks in the LOCAL declaration. Example below

From Editor.prg/Function EditMethod

Local bKeyDown := {|o,nKey|
IF nKey == VK_ESCAPE .AND. oDlg != Nil
oDlg := Nil
o:oParent:Close()
Return -1
ENDIF
Return -1
}

Once converted to

Local bKeyDown := {|o,nKey| bKeyDownF( o, nKey )}

With all the codeblock's code moved to a new function, it seems to compile and run, is there a flag/include I am missing on xharbour.com to allow this to compile?

Re: xHarbour.com version and HWGUI source

<sq2fgv$mh0$1@dont-email.me>

  copy mid

https://www.rocksolidbbs.com/devel/article-flat.php?id=16888&group=comp.lang.xharbour#16888

  copy link   Newsgroups: comp.lang.xharbour
Path: i2pn2.org!i2pn.org!eternal-september.org!reader02.eternal-september.org!.POSTED!not-for-mail
From: e.m.giordano@emagsoftware.it (Enrico Maria Giordano)
Newsgroups: comp.lang.xharbour
Subject: Re: xHarbour.com version and HWGUI source
Date: Thu, 23 Dec 2021 19:35:11 +0100
Organization: A noiseless patient Spider
Lines: 38
Message-ID: <sq2fgv$mh0$1@dont-email.me>
References: <241bbfe1-6fb1-4326-8c12-fce6a1f5c29en@googlegroups.com>
Mime-Version: 1.0
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: 7bit
Injection-Date: Thu, 23 Dec 2021 18:35:11 -0000 (UTC)
Injection-Info: reader02.eternal-september.org; posting-host="39bac4360d253740f857ff2c5db24bf8";
logging-data="23072"; mail-complaints-to="abuse@eternal-september.org"; posting-account="U2FsdGVkX1/J57ILhpFnhGRmMwkmewJ+"
User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:91.0) Gecko/20100101
Thunderbird/91.4.1
Cancel-Lock: sha1:iCKw84jWKcAz/YzDjCS6vroP9LI=
In-Reply-To: <241bbfe1-6fb1-4326-8c12-fce6a1f5c29en@googlegroups.com>
 by: Enrico Maria Giordan - Thu, 23 Dec 2021 18:35 UTC

Il 23/12/2021 19:08, Gary Williams ha scritto:

> HWGUI source does not compile cleanly under the last release of xHarbour.com base release, from what I can tell partly due to code blocks in the LOCAL declaration. Example below
>
> From Editor.prg/Function EditMethod
>
> Local bKeyDown := {|o,nKey|
> IF nKey == VK_ESCAPE .AND. oDlg != Nil
> oDlg := Nil
> o:oParent:Close()
> Return -1
> ENDIF
> Return -1
> }
>
> Once converted to
>
> Local bKeyDown := {|o,nKey| bKeyDownF( o, nKey )}
>
> With all the codeblock's code moved to a new function, it seems to compile and run, is there a flag/include I am missing on xharbour.com to allow this to compile?

Try using < and > instead ok { and } as codeblock delimeters:

Local bKeyDown := <|o,nKey|
IF nKey == VK_ESCAPE .AND. oDlg != Nil
oDlg := Nil
o:oParent:Close()
Return -1
ENDIF
Return -1
>

EMG

http://www.emagsoftware.it
http://www.emagsoftware.it/emgmusic
http://www.emagsoftware.it/spectrum
http://www.emagsoftware.it/tbosg

Re: xHarbour.com version and HWGUI source

<sq2fib$mh0$2@dont-email.me>

  copy mid

https://www.rocksolidbbs.com/devel/article-flat.php?id=16889&group=comp.lang.xharbour#16889

  copy link   Newsgroups: comp.lang.xharbour
Path: i2pn2.org!i2pn.org!eternal-september.org!reader02.eternal-september.org!.POSTED!not-for-mail
From: e.m.giordano@emagsoftware.it (Enrico Maria Giordano)
Newsgroups: comp.lang.xharbour
Subject: Re: xHarbour.com version and HWGUI source
Date: Thu, 23 Dec 2021 19:35:55 +0100
Organization: A noiseless patient Spider
Lines: 14
Message-ID: <sq2fib$mh0$2@dont-email.me>
References: <241bbfe1-6fb1-4326-8c12-fce6a1f5c29en@googlegroups.com>
<sq2fgv$mh0$1@dont-email.me>
Mime-Version: 1.0
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: 7bit
Injection-Date: Thu, 23 Dec 2021 18:35:55 -0000 (UTC)
Injection-Info: reader02.eternal-september.org; posting-host="39bac4360d253740f857ff2c5db24bf8";
logging-data="23072"; mail-complaints-to="abuse@eternal-september.org"; posting-account="U2FsdGVkX18Vb1Ht7PwjkMlcmncjgeXk"
User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:91.0) Gecko/20100101
Thunderbird/91.4.1
Cancel-Lock: sha1:6cAEo9v29pCounQp35AaAmrQOOc=
In-Reply-To: <sq2fgv$mh0$1@dont-email.me>
 by: Enrico Maria Giordan - Thu, 23 Dec 2021 18:35 UTC

Il 23/12/2021 19:35, Enrico Maria Giordano ha scritto:

> Try using < and > instead ok

"instead of"

:-)

EMG

http://www.emagsoftware.it
http://www.emagsoftware.it/emgmusic
http://www.emagsoftware.it/spectrum
http://www.emagsoftware.it/tbosg

Re: xHarbour.com version and HWGUI source

<f77c935b-6dab-46b9-aee3-a919ce88a488n@googlegroups.com>

  copy mid

https://www.rocksolidbbs.com/devel/article-flat.php?id=16890&group=comp.lang.xharbour#16890

  copy link   Newsgroups: comp.lang.xharbour
X-Received: by 2002:a05:6214:2583:: with SMTP id fq3mr2963274qvb.94.1640287948466;
Thu, 23 Dec 2021 11:32:28 -0800 (PST)
X-Received: by 2002:a05:6214:27ea:: with SMTP id jt10mr2068268qvb.49.1640287948293;
Thu, 23 Dec 2021 11:32:28 -0800 (PST)
Path: i2pn2.org!i2pn.org!weretis.net!feeder6.news.weretis.net!news.misty.com!border2.nntp.dca1.giganews.com!border1.nntp.dca1.giganews.com!nntp.giganews.com!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.lang.xharbour
Date: Thu, 23 Dec 2021 11:32:28 -0800 (PST)
In-Reply-To: <sq2fib$mh0$2@dont-email.me>
Injection-Info: google-groups.googlegroups.com; posting-host=2601:781:8100:3b4:894e:ffb3:5fc4:c6c8;
posting-account=HHEq4woAAADnwl5Ihl-uo-jF2A6Q7gZD
NNTP-Posting-Host: 2601:781:8100:3b4:894e:ffb3:5fc4:c6c8
References: <241bbfe1-6fb1-4326-8c12-fce6a1f5c29en@googlegroups.com>
<sq2fgv$mh0$1@dont-email.me> <sq2fib$mh0$2@dont-email.me>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <f77c935b-6dab-46b9-aee3-a919ce88a488n@googlegroups.com>
Subject: Re: xHarbour.com version and HWGUI source
From: gary.l.williams@gmail.com (Gary Williams)
Injection-Date: Thu, 23 Dec 2021 19:32:28 +0000
Content-Type: text/plain; charset="UTF-8"
Lines: 0
 by: Gary Williams - Thu, 23 Dec 2021 19:32 UTC

Thanks that did the trick, never been exposed to that until now, been using xharbour, and clipper since it was released, but still learning it seems.

1
server_pubkey.txt

rocksolid light 0.9.81
clearnet tor