[Harbour] ole problem internetexplorter

2010-05-23 Thread Apolinar
why this sample work good in xharbour but in harbour returns error: bound error array access called from main(9) compiled with mingw -lhbwin func main LOCAL oexplorer := CREATEOBJECT( "Internetexplorer.Application" ) oexplorer:Visible := .T. oexplorer:Height := 700 oexplorer:Naviga

Re: [Harbour] OLE objects syntax...

2009-11-20 Thread Viktor Szakáts
Hi Mindaugas, > An easy (but I do not know if it is correct) way to solve this problem is to > use DISPATCH_PROPERTYPUT | DISPATCH_PROPERTYPUTREF instead of > DISPATCH_PROPERTYPUT in Invoke() call. Actually we use such technique on > access: DISPATCH_PROPERTYGET | DISPATCH_METHOD. But my sugges

Re: [Harbour] OLE objects syntax...

2009-11-16 Thread francesco perillo
> > I still have problems with 100% cpu load when I call ::cClose() but > I'm investigating on this It seems that I have this problem only in the demo program... I will investigate i f possible... Francesco ___ Harbour mailing list (attachment size

Re: [Harbour] OLE objects syntax...

2009-11-16 Thread francesco perillo
> This can be solved by using "_" in front of method to force > DISPATCH_PROPERTYPUT. So, >   oPdfApp:_cOption( "UseAutoSave" , 1 ) > do the job. Yes, it does. Thank you ! I still have problems with 100% cpu load when I call ::cClose() but I'm investigating on this Francesco

Re: [Harbour] OLE objects syntax...

2009-11-15 Thread Viktor Szakáts
> In this case I agree that final type for error codes should be existing > HB_ERRCODE and this type should be converted to 'unsigned int' but before > you will change it please check all places in the Harbour SVN which will > be effected by such modification. We have to well know them. I'm mostly

Re: [Harbour] OLE objects syntax...

2009-11-15 Thread Viktor Szakáts
Hi Przemek, > Viktor, > > The bad thing with abstracted types is the fact the it makes creating > interface between Harbour and other tools harder. > As long as Harbour uses well known types then it's quite easy. > When I have a function in some library which needs as parameter variable as > type

Re: [Harbour] OLE objects syntax...

2009-11-15 Thread Przemysław Czerpak
On Sun, 15 Nov 2009, Szak�ts Viktor wrote: > >> // Error BASE/3012 Argument error: COPTION > >> // Called from WIN_OLEAUTO:COPTION(0) > >> // Called from SAMPLE(42) > > The real error code is 0x8002000E DISP_E_BADPARAMCOUNT > > It would be nice to have real OLE error code instead of 3012, but the

Re: [Harbour] OLE objects syntax...

2009-11-15 Thread Viktor Szakáts
>> // Error BASE/3012 Argument error: COPTION >> // Called from WIN_OLEAUTO:COPTION(0) >> // Called from SAMPLE(42) > > The real error code is 0x8002000E DISP_E_BADPARAMCOUNT > > It would be nice to have real OLE error code instead of 3012, but the problem > is that error codes are USHORT and O

Re: [Harbour] OLE objects syntax...

2009-11-15 Thread Mindaugas Kavaliauskas
DISPATCH_METHOD. But my suggestion is a shoot in the dark. Regards, Mindaugas P.S. just to summarize. Any comments on: 1) unsigned long error subcode 2) object:method(param) := value syntax 3) Harbour <-> OLE call mapping are welcome. ___ H

Re: [Harbour] OLE objects syntax...

2009-11-15 Thread francesco perillo
Here it is, save it as sample.prg, compiling is with these lines (the first one doesn't compile...) Comments and error messages in the code... hbmk2 sample.prg xhb.lib hbwin.lib -ofirst1 -dFIRST1 hbmk2 sample.prg xhb.lib hbwin.lib -ofirst2 -dFIRST2 hbmk2 sample.prg xhb.lib hbwin.lib -osecond -dSEC

Re: [Harbour] OLE objects syntax...

2009-11-14 Thread Mindaugas Kavaliauskas
Hi, In Harbour I can: ? object:cOption("property") and have the correct value but I don't know how to set that value ! Do you have any self contained sample? object:cOption("property") := .T. is not accepted by the compiler, Just like STR(7) := .T. object:cOption("property", .T.) is a r

[Harbour] OLE objects syntax...

2009-11-14 Thread francesco perillo
I have an OLE object (PdfCreator, a pdf printer driver for windows) that among other methods has the followings: Public Property Get cOption(ByVal PropertyName As String) As Variant Public Property Let cOption(ByVal PropertyName As String, ByVal Value As Variant) Public Property Get cVisible() As

Re: [Harbour] OLE in WINCE

2009-09-11 Thread Przemyslaw Czerpak
On Fri, 11 Sep 2009, AbeB wrote: > i observed the same results > 1. the font size won't show bigger or smaller when resized, it will only > reserve more pixels for it's height. > 2. it will not draw the letters in the center of the charecter cell. > 3. non alpha characters don't show. > i'm afraid

Re: [Harbour] OLE in WINCE

2009-09-11 Thread AbeB
i observed the same results 1. the font size won't show bigger or smaller when resized, it will only reserve more pixels for it's height. 2. it will not draw the letters in the center of the charecter cell. 3. non alpha characters don't show. i'm afraid it's not actually using Tohama font which

Re: [Harbour] OLE in WINCE

2009-09-11 Thread Jaroslaw Kadziola
Hi, 4 pictures for the same code - clipper with pocketdos for WM and harbour for winCE with this sets : hb_setCodePage( "PL852" ) hb_setTermCP( "PL852" ) hb_gtInfo( HB_GTI_RESIZEMODE, HB_GTI_RESIZEMODE_ROWS ) hb_gtInfo( HB_GTI_CODEPAGE, 0 ) hb_gtInfo( HB_GTI_FONTNAME, 'Tahoma'

[Harbour] OLE

2009-09-01 Thread Mindaugas Kavaliauskas
Hi, I have problems with OLE and variables by reference, exemple: ---cut--- oOle = Win_OleCreateObject( "NFe_Util_PL005a.Util" ) cName = "" cMess = "" oOle:PegaNomeCertificado( @cName, @cMess ) ? cName,cMess ---cut--- I have not implemented references in OLE because of a simple reason: I was

Re: [Harbour] OLE in WINCE

2009-08-26 Thread AbeB
Hi Jaroslaw, I'm too struggling win WCE. What I think is that Tahoma is not a fixed font. "Courier New" is. ( i tried in is Word on the emulater). A proportional spaced font will have the effect you see. But I tried to select "Courier New" but with weired effects. I looked in gtwvt.c and I see

Re: [Harbour] OLE in WINCE

2009-08-26 Thread Massimo Belgrano
I invite you post your screenshoot also on harbour project on facebook http://www.facebook.com/group.php?gid=48795263775&ref=ts i invite everybody to join on harbour group on facebook 2009/8/26 Jaroslaw Kadziola : > Hi, > > > PC> I cannot say it's your WinCE feature or some side effect of curre

Re: [Harbour] OLE in WINCE

2009-08-26 Thread Jaroslaw Kadziola
Hi, >> Just : >> >> > mingw32-make >> >> in the root directory will only recompile things which depend on the >> changed code. If the change above is the only change then it will >> automatically update what you are trying to update manually by going >> to the gtwvt directory. VS> That's tru

Re: [Harbour] OLE in WINCE

2009-08-26 Thread Viktor Szakáts
Just : > mingw32-make in the root directory will only recompile things which depend on the changed code. If the change above is the only change then it will automatically update what you are trying to update manually by going to the gtwvt directory. That's true although it's faster to ma

Re: [Harbour] OLE in WINCE

2009-08-26 Thread Jaroslaw Kadziola
Hi, PC> I cannot say it's your WinCE feature or some side effect of current console PC> window style. It was working for me in the initial version with PocketPC PC> emulator. Anyhow each time you are changing font then window is centered PC> by GTWVT code so maybe you wrote about this. Try to mov

Re: [Harbour] OLE in WINCE

2009-08-26 Thread Alex Strickland
Jaroslaw Kadziola wrote: So second question : must i build full Harbour in this case ? PC>2009-08-26 11:16 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) PC> * harbour/source/rtl/gtwvt/gtwvt.c PC>! fixed runtime font modification Or only gtwvt ? Just : > mingw32-make

Re: [Harbour] OLE in WINCE

2009-08-26 Thread Viktor Szakáts
VS> You can build all Harbour libraries or subdirs on all supported VS> platforms just the same way as you build full Harbour from root. VS> Just start GNU Make in the directory you want to rebuild: VS> C:\harbour\source\rtl\gtwvt> mingw32-make [clean] [install] Thanks - done. 'hbmk2 *.c -hblib

Re: [Harbour] OLE in WINCE

2009-08-26 Thread Jaroslaw Kadziola
Hi, >> Hi, >> >> >> VS> You can build all Harbour libraries or subdirs on all supported >> VS> platforms just the same way as you build full Harbour from root. >> VS> Just start GNU Make in the directory you want to rebuild: >> >> VS> C:\harbour\source\rtl\gtwvt> mingw32-make [clean] [install] >>

Re: [Harbour] OLE in WINCE

2009-08-26 Thread Viktor Szakáts
Hi, VS> You can build all Harbour libraries or subdirs on all supported VS> platforms just the same way as you build full Harbour from root. VS> Just start GNU Make in the directory you want to rebuild: VS> C:\harbour\source\rtl\gtwvt> mingw32-make [clean] [install] Thanks - done. 'hbmk2 *.c

Re: [Harbour] OLE in WINCE

2009-08-26 Thread Jaroslaw Kadziola
Hi, VS> You can build all Harbour libraries or subdirs on all supported VS> platforms just the same way as you build full Harbour from root. VS> Just start GNU Make in the directory you want to rebuild: VS> C:\harbour\source\rtl\gtwvt> mingw32-make [clean] [install] Thanks - done. 'hbmk2 *.c -

Re: [Harbour] OLE in WINCE

2009-08-26 Thread Viktor Szakáts
You can build all Harbour libraries or subdirs on all supported platforms just the same way as you build full Harbour from root. Just start GNU Make in the directory you want to rebuild: C:\harbour\source\rtl\gtwvt> mingw32-make [clean] [install] Brgds, Viktor On 2009.08.26., at 11:44, Jaroslaw

Re: [Harbour] OLE in WINCE

2009-08-26 Thread Jaroslaw Kadziola
Hi, PC> I've just commited: PC>2009-08-26 11:16 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) PC> * harbour/source/rtl/gtwvt/gtwvt.c PC>! fixed runtime font modification PC> so please try again. At first one question : how can i build only this one library (libgtwvt.a) ?

Re: [Harbour] OLE in WINCE

2009-08-26 Thread Przemyslaw Czerpak
[�roda, 26 sierpie� 2009], Jaroslaw Kadziola napisa�(a): > PC> remove it, it will only force unnecessary console creation which > PC> will be overwritten in a while. > Without 'cls' i get very little window in the middle of screen > (see: > http://picasaweb.google.pl/jarek.kadziola/WCEHarbour#537

Re: [Harbour] OLE in WINCE

2009-08-25 Thread Jaroslaw Kadziola
Hi, W liście datowanym 24 sierpnia 2009 (20:13:00) można przeczytać: PC> [sobota, 22 sierpie? 2009], Jarosław Kądzioła napisa3(a): PC> Hi, >> I've use modificated wcecon.prg from harbour/tests : >> +++ >> #include "hbgtinfo.ch"

Re: Re[2]: [Harbour] OLE in WINCE

2009-08-24 Thread Przemyslaw Czerpak
[sobota, 22 sierpie� 2009], Jarosław Kądzioła napisa�(a): Hi, > I've use modificated wcecon.prg from harbour/tests : > +++ > #include "hbgtinfo.ch" > proc main() >altd() >REQUEST HB_CODEPAGE_PL852 >cls remove it, it

Re[2]: [Harbour] OLE in WINCE

2009-08-22 Thread Jarosław Kądzioła
Hi, > BTW have you made some tests with different fonts for console window > in WinCE? > I forgot to tell you about one important switch. >hb_gtInfo( HB_GTI_RESIZEMODE, HB_GTI_RESIZEMODE_ROWS ) > disables automatic font resizing to screen dimensions. I've use modificated wcecon.prg from harbo

Re: [Harbour] OLE in WINCE

2009-08-21 Thread Jaroslaw Kadziola
Hi! W liście datowanym 21 sierpnia 2009 (15:45:02) napisano: > If you are using older version then please try to add -loleaut32 > to hbmk2 parameters. It should help. $ hbmk2 testole -loleaut32 hbmk: Processing local make script: hbmk.hbm

Re: [Harbour] OLE in WINCE

2009-08-21 Thread Przemyslaw Czerpak
[pi�tek, 21 sierpie� 2009], Jaroslaw Kadziola napisa�(a): > > Yesterday. Check ChangeLog. > >> When ? My WinCE build is after last nightly.zip > So they must be inside latest nightly. isn't it? No. Please remember about TIMEZONE differences. You have to compare ChangeLog entries to be sure. If yo

Re: [Harbour] OLE in WINCE

2009-08-21 Thread Jaroslaw Kadziola
> Sorry, I have no idea at exactly which time the nightly is created in > my time zone, > I also can't remember at exactly which time of day this commit was made. > I suggest using the SVN server directly. Ok. thanks for Your big tolerance ! -- Regards, Jaroslaw Kadziola __

Re: [Harbour] OLE in WINCE

2009-08-21 Thread Viktor Szakáts
Sorry, I have no idea at exactly which time the nightly is created in my time zone, I also can't remember at exactly which time of day this commit was made. I suggest using the SVN server directly. On Fri, Aug 21, 2009 at 3:28 PM, Jaroslaw Kadziola wrote: > Hi! > >> Yesterday. Check ChangeLog. >

Re: [Harbour] OLE in WINCE

2009-08-21 Thread Jaroslaw Kadziola
Hi! > Yesterday. Check ChangeLog. >> >> When ? My WinCE build is after last nightly.zip So they must be inside latest nightly. isn't it? Regards, Jaroslaw Kadziola ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/

Re: [Harbour] OLE in WINCE

2009-08-21 Thread Viktor Szakáts
Yesterday. Check ChangeLog. On Fri, Aug 21, 2009 at 2:30 PM, Jaroslaw Kadziola wrote: > Hi, > > > VS>I've added some long time missing wce syslibs > VS> to our make systems. > > When ? My WinCE build is after last nightly.zip > > > -- > Regards, >  Jaroslaw Kadziola > > ___

Re: [Harbour] OLE in WINCE

2009-08-21 Thread Jaroslaw Kadziola
Hi, VS>I've added some long time missing wce syslibs VS> to our make systems. When ? My WinCE build is after last nightly.zip -- Regards, Jaroslaw Kadziola ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailm

Re: [Harbour] OLE in WINCE

2009-08-21 Thread Viktor Szakáts
You should try recent SVN, I've added some long time missing wce syslibs to our make systems. Brgds, Viktor On Fri, Aug 21, 2009 at 2:11 PM, Jaroslaw Kadziola wrote: > Hi, > > Maybe my question is stupid but : is any chance to use OLE functions in > WinCE ? > When i try compile testole.prg from /

[Harbour] OLE in WINCE

2009-08-21 Thread Jaroslaw Kadziola
Hi, Maybe my question is stupid but : is any chance to use OLE functions in WinCE ? When i try compile testole.prg from /contribs/hbwin/tests i get : $ hbmk2 testole hbmk: Processing local make script: hbmk.hbm hbmk: Processing configuration: J:\MSYS\1.0\hb-m

Re: Re: [Harbour] Re: Harbour OLE and byref

2009-08-14 Thread toni...@fwi
>OK, thank you. So I'll left this code commented by #if 0 >Maybe somewhere in the future we will return to this subject. Hi Przemek. I thank you. Due to your changes I can use OLE byref with no problems. Best regards, Toninho. __ Faça ligações p

Re: [Harbour] Re: Harbour OLE and byref

2009-08-14 Thread Przemyslaw Czerpak
On Fri, 14 Aug 2009, toni...@fwi wrote: Hi, > Only to you understand scenario, I have a simple call: > ---cut--- > local nRet:= 1, cTitular := "", cCnpj := "", cNumeroSerie := "", > cEmissor := "", cInicioValidade := "", cFimValidade := "", cMensagem > := "" > nRet = ::oNFEUtil:PegaDadosCertifica

Re: Re: [Harbour] Re: Harbour OLE and byref

2009-08-14 Thread toni...@fwi
Hi Przemek, >Thank you for your test but you added above if() statement to wrong >function hb_oleItemToVariantRef() and I asked about hb_oleVariantToItem(). >To avoid possible typos I'll commit some modifications to olecore.c >and I'll add code disabled by '#if 0' which uses such alternative >meth

Re: [Harbour] Re: Harbour OLE and byref

2009-08-14 Thread Przemyslaw Czerpak
On Fri, 14 Aug 2009, toni...@fwi wrote: Hi, > >Please also add at beginning of function hb_oleVariantToItem() > > > > if( pVariant->n1.n2.vt == VT_VARIANT | VT_BYREF ) > > pVariant = pVariant->n1.n2.n3.pvarVal; > > > >and then test again. > Hi Przemek, same result: all var is nil and now g

Re: Re: [Harbour] Re: Harbour OLE and byref

2009-08-14 Thread toni...@fwi
>Please also add at beginning of function hb_oleVariantToItem() > > if( pVariant->n1.n2.vt == VT_VARIANT | VT_BYREF ) > pVariant = pVariant->n1.n2.n3.pvarVal; > >and then test again. Hi Przemek, same result: all var is nil and now gpf too. ---cut--- static void hb_oleItemToVariantRef( VARI

Re: [Harbour] Re: Harbour OLE and byref

2009-08-14 Thread Przemyslaw Czerpak
On Fri, 14 Aug 2009, toni...@fwi wrote: Hi, > >If possible please make simple test and add at the end of > >hb_oleItemToVariantRef() code: > > if( pVarRef ) > > { > > pVarRef->n1.n2.vt = VT_VARIANT | VT_BYREF; > > pVarRef->n1.n2.n3.pvarVal = pVariant; > > } > I do it and now all b

Re: [Harbour] Re: Harbour OLE and byref

2009-08-14 Thread toni...@fwi
Hi Przemek, >If possible please make simple test and add at the end of >hb_oleItemToVariantRef() code: > > if( pVarRef ) > { > pVarRef->n1.n2.vt = VT_VARIANT | VT_BYREF; > pVarRef->n1.n2.n3.pvarVal = pVariant; > } I do it and now all byref vars return NIL >Now my list of OLE TODO

[Harbour] Re: Harbour OLE and byref

2009-08-14 Thread Przemyslaw Czerpak
On Thu, 13 Aug 2009, toni...@fwi wrote: Hi, > > Please test it after: > Przemek, seems that all is working fine. Thanks for the information though it probably needs deeper tests to eliminate possible typos in different translations. I've found in xHarbour many wrong translations and no one has b

Re: [Harbour] OLE and reference variables

2009-08-09 Thread Viktor Szakáts
Hi Toninho, Okay. I hope someone will post portable test code for this feature and I can look at it further, this way it's only shot in the dark. Hi Viktor, if you want to test, please download this package (http://www.fwi.com.br/nfe.zip) and don't install anything, only you need is dotnetfx.

Re: Re: [Harbour] OLE and reference variables

2009-08-08 Thread toni...@fwi
>Okay. I hope someone will post portable test code for this >feature and I can look at it further, this way it's only >shot in the dark. Hi Viktor, if you want to test, please download this package (http://www.fwi.com.br/nfe.zip) and don't install anything, only you need is dotnetfx.exe and you n

Re: [Harbour] OLE and reference variables

2009-08-08 Thread Viktor Szakáts
Okay. I hope someone will post portable test code for this feature and I can look at it further, this way it's only shot in the dark. Brgds, Viktor On 2009.08.09., at 1:49, toni...@fwi wrote: I'm rather sending you the patched source for you to do the testing, as I don't want to install any ne

Re: Re: [Harbour] OLE and reference variables

2009-08-08 Thread toni...@fwi
>I'm rather sending you the patched source for you to do the testing, >as I don't want to install any new components into my system as admin, >also such test can't be uploaded to SVN. Hi Viktor, I tested olecore.c that you send me and I have the same result. Reference variables are empty. Thank

Re: [Harbour] OLE and reference variables

2009-08-08 Thread Antonio Carlos
> I've made an attempt to implement this, but can't test it. > > Could you send a code example with some default XP OLE > component which with I can test it? Hi Viktor. you need download this package: http://www.fwi.com.br/nfe.zip after download, please run registraDLL.bat, and install .\certi

Re: [Harbour] OLE and reference variables

2009-08-08 Thread toni...@fwi
Hi friends, Only to know: tested with XHarbour and works perfectly. Regards, Toninho. __ Faça ligações para outros computadores com o novo Yahoo! Messenger http://br.beta.messenger.yahoo.com/ ___ Harbour

Re: [Harbour] OLE and reference variables

2009-08-08 Thread Viktor Szakáts
Hi, I've made an attempt to implement this, but can't test it. Could you send a code example with some default XP OLE component which with I can test it? Brgds, Viktor On 2009.08.08., at 9:30, toni...@fwi wrote: Hi, I have problems with OLE and variables by reference, exemple: ---cut--- oO

[Harbour] OLE and reference variables

2009-08-08 Thread toni...@fwi
Hi, I have problems with OLE and variables by reference, exemple: ---cut--- oOle = Win_OleCreateObject( "NFe_Util_PL005a.Util" ) cName = "" cMess = "" oOle:PegaNomeCertificado( @cName, @cMess ) ? cName,cMess ---cut--- cName and cMess is always empty. Any hint please ? Thanks abd best regards,

[Harbour] OLE

2009-06-15 Thread AbeB
I can't figure out why these will generate a OLE runtime error executing Sheet:rows(1):HorizontalAlignment := xlCenter //no good #define xlCalculationAutomatic 0xEFF7 #define xlCalculationManual 0xEFD9 #define xlCenter 0xEFF4 #define xlAutomatic

Re: [Harbour] OLE - Feature Request

2009-05-26 Thread Pritpal Bedi
Hello Mindaugas Kavaliauskas wrote: > > I found the way to implement GetObject() with the first parameter only > (it is CoGetObject()). It seems, the function is equivalent > CreateObject() if only the second parameter is used. But I found no > info, how it can be implemented using both para

Re: [Harbour] OLE - Feature Request

2009-05-25 Thread Mindaugas Kavaliauskas
Pritpal Bedi wrote: Hello Mindaugas, All Here is a MSDN - VB Documentation below. Can we have this type of function in Harbour? GetObject Function Returns a reference to an object provided by a COM component. Public Function GetObject( _ Optional ByVal PathName As String = Nothing, _ Opt

[Harbour] OLE - Feature Request

2009-05-24 Thread Pritpal Bedi
Hello Mindaugas, All Here is a MSDN - VB Documentation below. Can we have this type of function in Harbour? GetObject Function Returns a reference to an object provided by a COM component. Public Function GetObject( _ Optional ByVal PathName As String = Nothing, _ Optional ByVal Class

Re: R: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-13 Thread Enrico Maria Giordano
-Messaggio Originale- Da: "Saulius Zrelskis" <[EMAIL PROTECTED]> A: "Harbour Project Main Developer List." Data invio: mercoledì 13 febbraio 2008 14.53 Oggetto: Re: R: [Harbour] OLE Implementation - xHarbour Compatibility > Please read the old messag

Re: R: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-13 Thread Saulius Zrelskis
Hello Enrico, > My tests with BCC 5.5 & 5.8 shows, that alignment switches > > -a4 and -a8 have not any influence in xHarbour work. > > > Please read the old messages about this problem in this list. > > > EMG > > what you meant? Saulius ___ Harbour ma

Re: R: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-13 Thread Enrico Maria Giordano
-Messaggio Originale- Da: "Saulius Zrelskis" <[EMAIL PROTECTED]> A: "Harbour Project Main Developer List." Data invio: mercoledì 13 febbraio 2008 9.30 Oggetto: Re: R: [Harbour] OLE Implementation - xHarbour Compatibility Hello Enrico, My tests with

Re: R: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-13 Thread Saulius Zrelskis
Hello Enrico, My tests with BCC 5.5 & 5.8 shows, that alignment switches -a4 and -a8 have not any influence in xHarbour work. IMHO Przemek is pointed to wrong direction and he cannot test M$ branch, so can you do one more test with your example, maybe with slightly supplement ? OS(), Version()

RE: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-11 Thread Massimo Belgrano
Thanks. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Szakáts Viktor Sent: Monday, February 11, 2008 1:40 PM To: Harbour Project Main Developer List. Subject: Re: [Harbour] OLE Implementation - xHarbour Compatibility Hi Massimo, This is it. The first

Re: R: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-11 Thread Saulius Zrelskis
Enrico, Thank you for sample. As expected, your code works well here. Now trying to squeeze a GPF without success. The only one change made in xharbour\makefile.bc from -a8 to -a4 Best regards, Saulius ___ Harbour mailing list Harbour@harbour-project.or

Re: R: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-11 Thread Enrico Maria Giordano
-Messaggio Originale- Da: "Saulius Zrelskis" <[EMAIL PROTECTED]> A: "Harbour Project Main Developer List." Data invio: lunedì 11 febbraio 2008 14.55 Oggetto: Re: R: [Harbour] OLE Implementation - xHarbour Compatibility Enrico, have you code, which GP

Re: R: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-11 Thread Mindaugas Kavaliauskas
Saulius Zrelskis wrote: OLE include files have their suitable #pragma option directives with restoring _all_ initial settings, so different alignment seems as if provided by compiler... Hi, I also have a question similar to Saulius. Do you know what structures needs some specific alignment?

Re: R: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-11 Thread Saulius Zrelskis
Very useful reading, thank you, Przemek. It needs deeper tests done, I am extremely interested to assist. Enrico, have you code, which GPFs with -a4 ? Have to mention, that before building xHarbour binaries I always search for "-a8" and replacing with "-a4" (there are about ten places in sources)

Re: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-11 Thread Szakáts Viktor
f Of Szakáts Viktor Sent: Monday, February 11, 2008 12:23 PM To: Harbour Project Main Developer List. Subject: Re: [Harbour] OLE Implementation - xHarbour Compatibility Hi Massimo, Yes, it's a clean compile with MSVC 2008 Express, too. Can you send me/post the batch for compiling xharbour

Re: R: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-11 Thread Przemyslaw Czerpak
On Mon, 11 Feb 2008, Saulius Zrelskis wrote: > I always compiling xHarbour with BCC -a4 alignment; sizeof(HB_ITEM) = 24 > and memory(HB_MEM_STACK) / memory(HB_MEM_STACKITEMS) = 24. > But never noticed any anomaly in OLE work. Can you help me how to make > sure with this?? Till now I think, that it

RE: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-11 Thread Massimo Belgrano
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Szakáts Viktor Sent: Monday, February 11, 2008 12:23 PM To: Harbour Project Main Developer List. Subject: Re: [Harbour] OLE Implementation - xHarbour Compatibility >Hi Massimo, >Yes, it's a clean compile with MSVC 2008 E

Re: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-11 Thread Szakáts Viktor
onday, February 11, 2008 9:29 AM To: Harbour Project Main Developer List. Subject: Re: [Harbour] OLE Implementation - xHarbour Compatibility Hi Alex, It's a clean compile now (no errors or warnings) with MSVC. See my ChangeLog entry from around last week. Tested with MSVC 2005 Express (th

Re: R: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-11 Thread Saulius Zrelskis
Hello, Przemek I always compiling xHarbour with BCC -a4 alignment; sizeof(HB_ITEM) = 24 and memory(HB_MEM_STACK) / memory(HB_MEM_STACKITEMS) = 24. But never noticed any anomaly in OLE work. Can you help me how to make sure with this?? Till now I think, that it is enough for OLE structures to be co

RE: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-11 Thread Massimo Belgrano
Can you tried also MSCV 2008 Express ? -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Szakáts Viktor Sent: Monday, February 11, 2008 9:29 AM To: Harbour Project Main Developer List. Subject: Re: [Harbour] OLE Implementation - xHarbour Compatibility Hi

Re: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-11 Thread Szakáts Viktor
Oh okey, sorry. Brgds, Viktor On 2008.02.11., at 9:44, Alex Strickland wrote: Szakáts Viktor wrote: It's a clean compile now (no errors or warnings) with MSVC. See my ChangeLog entry from around last week. Tested with MSVC 2005 Express (the free one) + SDK Vista (also free). Sorry, I shoul

Re: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-11 Thread Alex Strickland
Szakáts Viktor wrote: It's a clean compile now (no errors or warnings) with MSVC. See my ChangeLog entry from around last week. Tested with MSVC 2005 Express (the free one) + SDK Vista (also free). Sorry, I should be more specific. I meant the ActiveX support in FreeWin which I think is only

Re: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-11 Thread Szakáts Viktor
Hi Alex, It's a clean compile now (no errors or warnings) with MSVC. See my ChangeLog entry from around last week. Tested with MSVC 2005 Express (the free one) + SDK Vista (also free). Brgds, Viktor On 2008.02.11., at 8:14, Alex Strickland wrote: Pritpal Bedi wrote: Even compiling Harbour,

Re: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-10 Thread Alex Strickland
Pritpal Bedi wrote: Even compiling Harbour, hbw32, and my sources, with default flags I am able to host Active-X's and receive events properly (will be updating FreeWin shortly). No problems, may be for the time-being. Out of interest, do you know if anyone has this compiling for MSVC? I tri

Re: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-10 Thread Pritpal Bedi
Hello Przemek Przemyslaw Czerpak-2 wrote: > > The ported version is in hbw32 library in w32_ole.c and w32_tole.prg > files. It's xHarbour's win32ole.prg code with some minor fixes AFAIR > even synced with recent xHarbour's modifications. > But please remember that this code inherited very serio

R: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-10 Thread Massimo Belgrano
-Messaggio originale- >Da: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Per >conto di Przemyslaw Czerpak >Inviato: domenica 10 febbraio 2008 14.17 >But please remember that this code inherited very serious problem >from xHarbour. If you are using BCC then it will need -a8 alignment >for OLE

Re: [Harbour] OLE Implementation - xHarbour Compatibility

2008-02-10 Thread Przemyslaw Czerpak
On Sat, 09 Feb 2008, Pritpal Bedi wrote: > Hello Everybody > Has anybody been able to use xHarbour's win32ole.prg in Harbour ? The ported version is in hbw32 library in w32_ole.c and w32_tole.prg files. It's xHarbour's win32ole.prg code with some minor fixes AFAIR even synced with recent xHarbour'

[Harbour] OLE Implementation - xHarbour Compatibility

2008-02-09 Thread Pritpal Bedi
Hello Everybody Has anybody been able to use xHarbour's win32ole.prg in Harbour ? I am in a process of porting an huge application which is heavily based on Active-X's. The application takes advantage of FreeWin (SourceForge) library and hosts many objects. I am struck at hb_oleItemToVariant() a