Hi Enrico, I can see no hbwin calls in this example.
Brgds, Viktor On 2009 Dec 13, at 14:00, Enrico Maria Giordano wrote: > > -----Messaggio Originale----- Da: "ToninhoFWi" <toninho...@yahoo.com.br> > A: "Harbour Project Main Developer List." <harbour@harbour-project.org> > Data invio: sabato 12 dicembre 2009 23.53 > Oggetto: Re: Re: [Harbour] Adding MAPI to hbwin > > >> Now mapi is working fine and testmapi.prg is tested under windows >> vista with success, > > The following sample still GPFs for me (works fine using xHarbour): > > #include "FiveWin.ch" > #include "Mail.ch" > > static oWnd > > //----------------------------------------------------------------------------// > > function Main() > > local oBar > > DEFINE WINDOW oWnd TITLE "Using Windows MAIL Services" > > > SET MESSAGE OF oWnd TO "FiveWin - Windows MAIL support" CENTERED > > ACTIVATE WINDOW oWnd ON INIT Test() ; > VALID MsgYesNo( "Want to end ?" ) > > return nil > > //----------------------------------------------------------------------------// > > function Test() > > local oMail > > DEFINE MAIL oMail ; > SUBJECT "Testing..." ; > TEXT "This is real xBase power at your fingertips!" ; > FROM USER ; > RECEIPT > > ACTIVATE MAIL oMail > > MsgInfo( oMail:nRetCode ) > > return nil > > //----------------------------------------------------------------------------// > > EMG > > -- > EMAG Software Homepage: http://www.emagsoftware.it > The EMG's ZX-Spectrum Page: http://www.emagsoftware.it/spectrum > The Best of Spectrum Games: http://www.emagsoftware.it/tbosg > The EMG Music page: http://www.emagsoftware.it/emgmusic > _______________________________________________ > Harbour mailing list (attachment size limit: 40KB) > Harbour@harbour-project.org > http://lists.harbour-project.org/mailman/listinfo/harbour _______________________________________________ Harbour mailing list (attachment size limit: 40KB) Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
