ParallelGraphics Forums
SDK
You are here: [Forums]::[General]::[SDK]

Registration 
Registration
Forgot your password?

Help 
Help
Support

Quick search 

Subscribe to newsletters 

Install Cortona VRML Client for FREE!
Outline 3D
3D Page Of the Week
email:  password:
   General - SDK

Subject: Event Handling in VB / Delphi...classes, classes..
Sender: Martin Dolgner 2.04.04 07:09

Hi all,

I have a problem with the definition of a class
in VB6. I try to translate on of the Cortona example
(Lesson 9 of the Delphi Tutorial) into VB6 and
an error occurs

here the code of the class "MyCallBack":


Implements IVRMLEventCallback

Public Sub IVRMLEventCallback_OnEvent(value As VRMLField, Hint, TimeStamp As Double)


Dim X, Y, Z As Single
Dim TempStr As String
If Hint = "Coordinates" Then

X = SFVec3f(value).X
Y = SFVec3f(value).Y
Z = SFVec3f(value).Z
Form9.Label1.Caption = "X=" + Str(X) & "#13#10" & "Y=" & Str(Y) & "#13#10" & "Z=" & Str(Z)

If Hint = "Click" Then
TempStr = Str(TimeStamp)
ShowMessage ("Time now: " & TempStr & "msec from the First of January, 1970")
End Sub

...something might be wrong with the header...
the declaration of the procedure doesn´t correspond to the event or another procedure.
I hope anybody can help me, thank you in advance.

Regards,

Martin Dolgner

 


Event Handling in VB / Delphi...classes, classes.. / Martin Dolgner / 2.04.04 07:09
     Re: Event Handling in VB / Delphi...classes, classes.. / Mikhail / 6.04.04 05:55

Messages in thread: 2


© 1998-2009 ParallelGraphics. All rights reserved. Terms of use.