How to detect the events fired

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   Hi, Do you know how to implement this code in delphi? or windev(pcsoft)?

What I want to do is to detect the event that is fired.

OnReminders

------- from the sample vb code provided By Codejock

    Dim pRemI As CalendarReminder
    Dim pEventI As CalendarEvent

    For Each pRemI In frmMain.CalendarControl.Reminders
        Set pEventI = pRemI.Event
        .
        .
    Next

------------

Thank's

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
aboldoc Members Profile Send Private Message Find Members Posts Add to Buddy List Newbie Joined: 06 September 2006 Status: Offline Points: 3	Post Options Post Reply Quote aboldoc Report Post Thanks(0) Quote Reply Topic: How to detect the events fired Posted: 02 October 2006 at 2:18pm
	Hi, Do you know how to implement this code in delphi? or windev(pcsoft)? What I want to do is to detect the event that is fired. OnReminders ------- from the sample vb code provided By Codejock Dim pRemI As CalendarReminder Dim pEventI As CalendarEvent For Each pRemI In frmMain.CalendarControl.Reminders Set pEventI = pRemI.Event . . Next ------------ Thank's

sserge Members Profile Send Private Message Find Members Posts Add to Buddy List Moderator Group Joined: 01 December 2004 Status: Offline Points: 1297	Post Options Post Reply Quote sserge Report Post Thanks(0) Quote Reply Posted: 03 October 2006 at 10:37am
	Hi, Which data provider do you use? I suppose that Custom. I've heard once about such a problem with PowerBuilder environment. Reminder object does not contain an event object, it stores EventID. pRemI.Event calls DataProvider.GetEvent(EventID). GetEvent fires DoReadEvent notification. In DoReadEvent implementation you'll have to create an event object, fill properties and return it. But the problem is that PowerBilder does not return parameters other than VARIANT type. I suppose you have the same problem. To solve this problem a few additional notifications with VARIANT parameters were added: DoReadEventV, DoReadRPatternV This is available by request as a patch for version 10.3.1. PS: And also please check that parameters in you functions declarations which must be ByRef is actually ByRef. -- WBR, Serge