Page 1 of 18

PureDispHelper UserLib - Update with Includefile for Unicode

Posted: Fri Apr 20, 2007 12:06 am
by ts-soft
PureDispHelper is based on DispHelper, a free open source C library
developed by xtmous http://disphelper.sourceforge.net

This userlib doesn't support unicode, sorry

With this lib, you can use COM, ActiveX, OCX and so on, without Interfaces!

Helpfile english

Some examples added:
ado, flash, ie, mediaplayer, msxml, network, sapi, vbs and word

//edit
added: agent, excel, regex

//edit2
added "ComEventSink.pb" from freak, to use events with OCX :D
thanks freak for this

Special thank to kiffi (beta tester and author from many examples)

PureDisphelper v.1.5

// edit
update to pb 4.20 ...

Posted: Fri Apr 20, 2007 6:49 am
by benny
@ts-soft:
This sounds pretty cool - must have a closer look later on it ! Thanks for
sharing !!!

Posted: Fri Apr 20, 2007 8:19 am
by Rings
Holy, cow !
this port is the most userfriendly try to
use COM-Objects (ActiveX-DLL's) with Purebasic.
Nice examples too.
Godd Work!
Thomas: you should write in the title,
that with this lib you can easily use Com-Objects.

Posted: Fri Apr 20, 2007 8:28 am
by ts-soft
thanks at all
Rings wrote:Thomas: you should write in the title,
that with this lib you can easily use Com-Objects.
Done :wink:

Posted: Fri Apr 20, 2007 8:35 am
by LuckyLuke
GREAT JOB !!! :D
(should be part of the next PureBasic release)

Posted: Fri Apr 20, 2007 8:45 am
by Dare
My word!

This looks fantastic!

Thank you very much!


Edit:

Doors are opening. Doors are opening in every direction!. :D

Posted: Fri Apr 20, 2007 9:04 am
by Kiffi
LuckyLuke wrote:(should be part of the next PureBasic release)
Full ACK! :D

Greetings ... Kiffi

Posted: Fri Apr 20, 2007 9:19 am
by gnozal
LuckyLuke wrote:GREAT JOB !!! :D
(should be part of the next PureBasic release)
+ 1

Posted: Fri Apr 20, 2007 9:50 am
by ts-soft
The MediaPlayer example is at first start a bit slow, but if you restart, it's load
the Video from browsercache and should work normal :wink:

Posted: Fri Apr 20, 2007 10:32 am
by srod
gnozal wrote:
LuckyLuke wrote:GREAT JOB !!! :D
(should be part of the next PureBasic release)
+ 1
+ 1

:)

Excellent job.

Posted: Fri Apr 20, 2007 11:14 am
by freak
ts-soft: The DispHelper lib (and COM) use unicode anyway, so unicode support should not be a big problem.

If you need help on this, just contact me.

Posted: Fri Apr 20, 2007 12:21 pm
by byo
Thanks a lot for that. :D
Simply amazing!

Posted: Fri Apr 20, 2007 1:21 pm
by ts-soft
added Agent - Example

Code: Select all

dhToggleExceptions(#True)

Define.l oAgent, oGenie

oAgent = dhCreateObject("Agent.Control.1")

If oAgent
  dhPutValue(oAgent, "Connected = %b", #True)
  dhCallMethod(oAgent, "Characters.Load(%s)", @"Genie")
  dhGetValue("%o", @oGenie, oAgent, "Characters(%s)", @"Genie")
  If oGenie
    dhCallMethod(oGenie, "Show")
    dhCallMethod(oGenie, "MoveTo(%d,%d)", 300, 200)
    dhCallMethod(oGenie, "Play(%s)", @"Greet")
    dhCallMethod(oGenie, "Speak(%s)", @"Hello, feel the ..Pure.. Power of PureBasic")
    dhCallMethod(oGenie, "Play(%s)", @"Reading")
    Delay(20000)
    dhCallMethod(oGenie, "Stop")
    dhCallMethod(oGenie, "Speak(%s)", @"PureBasic is a nice computer language")
    MessageRequester("Agent", "click ok to end")
    dhCallMethod(oGenie, "Play(%s)", @"Hide")
    Delay(3000)
    dhReleaseObject(oGenie)
  EndIf
  dhReleaseObject(oAgent)
EndIf
Have fun :D

Posted: Fri Apr 20, 2007 1:39 pm
by Pantcho!!
Damn i can't thank you enough! this is sooooo sweet!!

You made a HUGE contribution to the community!!

thanks man :P

Posted: Fri Apr 20, 2007 2:20 pm
by JCV
wowowoww! thanks a lot! :D