New topic: Help with VB OLE to RB
<http://forums.realsoftware.com/viewtopic.php?t=26936> Page 1 of 1 [ 1 post ] Previous topic | Next topic Author Message tpolson Post subject: Help with VB OLE to RBPosted: Sun Mar 15, 2009 12:28 am Joined: Fri Oct 07, 2005 11:03 pm Posts: 14 i have some code in VB: ' Create the player object. Player = CreateObject("Player.Automation") Dim mode ' Update player mode, state, position and duration. Player.GetPlaybackMode(mode) If mode = 0 Then ModeLabel.Text = "No video loaded" End If what would the equivalent of "Player.GetPlaybackMode(mode)" be in realbasic? the automation object parameter is this: HRESULT _stdcall GetPlaybackCompleted([out] VARIANT * Completed ); in VBScript it looks like this: Dim Player Set Player = WScript.CreateObject("Player.Automation") Dim Completed Player.GetPlaybackCompleted Completed MsgBox Completed thanks Top Display posts from previous: All posts1 day7 days2 weeks1 month3 months6 months1 year Sort by AuthorPost timeSubject AscendingDescending Page 1 of 1 [ 1 post ] -- Over 900 classes with 18000 functions in one REALbasic plug-in. The Monkeybread Software Realbasic Plugin v8.1. <http://www.monkeybreadsoftware.de/realbasic/plugins.shtml> [email protected]
