FiveTech Software tech support forums

Antonio Linares wrote:Dear Toninho,
You may use defines for each value, in example:
#define xtpCalendarDayThursday 16

Hi Antonio, Thanks for the answer.

I'm doing this, but it would be easier to get the value directly from the object.

BTW thank you

Regards.

Hi friends,

Is there a way to get an active enum value by its name:

For example: I need get "xtpCalendarDayThursday" value to use in activeX object:

type
CalendarWeekDay = TOleEnum;
const
xtpCalendarDaySunday = 1;
xtpCalendarDayMonday = 2;
xtpCalendarDayTuesday = 4;
xtpCalendarDayWednesday ...

Hi, maybe you can test with chilkat:

https://www.example-code.com/foxpro/pdf_signatures.asp

Regards,

Toninho.

If you use the flag -gc3 when calling harbour.exe it generates C calls without using pcode, thus your apps will be a little faster :-)

we would like to have your feedback about building your FWH + Harbour apps using this flag

thank you!

Hi Antonio, I'm using -gc3 for years!!! I think since 2019 ...

Hi, I use chilkat for that:

https://tools.chilkat.io/xmlDsigGen

Regards.

PS: choose FOXPRO to generate the code and you can simple change "." by ":" to use in FWH/Harbour class

Holá, exemplo para ler um XML, no site tem várias funções em FOXPRO que você troca o "." por ":" e pode usar no harbour.

Eu uso a Chilkat para assinar PDF e assinar XML de fatura eletrônica do brasil.

---cut---
static procedure testChilkat()

local oGlobal := win_OleGetActiveObject( "Chilkat_9_5 ...

Wow!

Good news, today I'm using Chilkat because I need some features that Harbour don't have, for example XmlDSigGen,
using Pyton for sure there are no limitation to do this.

Thank you Antonio, best regards.

Hi Mark sorry for jump in this topic, but I have issues in Brazilian NFe and the only way I found to connect and manage his web service is using Chilkat ActiveX dll. The support is great and the guys helped me a lot.

Regards,

Toninho.

Hi, try use chilkat activex dll, there are a lot of foxPro samples that can be used with harbour

https://www.example-code.com/foxpro/smtp.asp

regards

Maybe you could try to modify this function using longs instead of ints:

HB_FUNC( GETWNDRECT ) // hWnd --> { nTop, nLeft, nBottom, nRight }{... hb_reta( 4 ); hb_storvnl( rct.top, -1, 1 ); // changed! hb_storvnl( rct.left, -1, 2 ); // changed! hb_storvnl&#40 ...

Otto, try asProtect:

http://www.aspack.com/asprotect32.html

Regards,

Toninho.

Hi Antonio how are you?

I found a interesting bug in screen coordinates function (at least in windows 11):

---cut---
GetWindowRect( hWnd, &rct );
wWidth = rct.right - rct.left;
wHeight = rct.bottom - rct.top;
---cut---

In windows 11 rct.right is 1374 and rct.left is -8, so 1374 - (-8) give ...

https://github.com/asistex/Sublime-Text-harbour-Package

Cheers.

Hi, there are a way to load .SVG icon files and display it like a normal image please?

TIA and best regards.

to compile service.prg I use this:

---cut---
set PATH=c:\bcc\bin;%PATH%

\harbour-install\bin\hbmk2 service -lhbwin -lace32 -lrddads -iC:\harbour-install\contrib\hbwin
---cut---


Regards.