Doesn't work here. Dave. ----- Original Message ----- From: "Jason Coley" <[EMAIL PROTECTED]> To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]> Sent: Monday, July 30, 2001 9:23 AM Subject: RE: RE: [DUG]: ActiveX control not binding? Help!!! Can someone who has Outlook and a spare few minutes, make a custom activex control, based on a edit control (Tedit) make the text field bindable, register the cotnrol, then go to Outlook, make a custom form, add the control to the form, bind it to a field and see if the data they enter into the field actually saves in the contact record. For some reason even a simple control does not save changes, but does in fact read the text values. Regards Jason Coley Manawatu Software Solutions http://www.software-solutions.co.nz -----Original Message----- From: Jason Coley Sent: Friday, 27 July 2001 11:58 To: Multiple recipients of list delphi Subject: RE: [DUG]: ActiveX control not binding? I think I am very close to getitng this going, if I access the value via VBScript in Outlook my get function is fired properly, so i think it definetely has something to do with the binding of the control to outlook, or rather the binding in the control not working, and I think that has to do with the lack of a change event in the delphi activex form. since there is no change event, then I think the control cannot tell Outlook that the value has changed therefore Outlook is not asking the get function to return the value. -----Original Message----- From: Jason Coley Sent: Friday, 27 July 2001 9:45 To: Multiple recipients of list delphi Subject: RE: [DUG]: ActiveX control not binding? I found all this about D3 with regards to binding, do I need all of this in D5? class TButtonXControl = ...; ... private FPropNotifySink: IPropNotifySink; end; procedure TButtonXControl.InitializeControl; begin FConnectionPoints.CreateConnectionPoint(IPropNotifySink, PropNotifySinkConnect); FDelphiControl.OnChanged := OnChangedEvent; FDelphiControl.OnChanging := OnChangingEvent; end; procedure TButtonXControl.PropNotifySinkConnect(const Sink: IUnknown); begin if Sink <> nil then OleCheck(Sink.QueryInterface(IPropNotifySink, FPropNotifySink)) else FPropNotifySink := nil; end; procedure TButtonXControl.Set_Caption(const Value: WideString); begin FDelphiControl.Caption := TCaption(Value); end; procedure TButtonXControl.OnChangingEvent( Sender: TObject ); begin if FPropNotifySink <> nil then if FPropertyNotifySink.RequestEdit( DISPID_CAPTION ) = S_FALSE then OleError( CTL_E_SETNOTPERMITTED ); end; procedure TButtonX.OnChangedEvent( Sender:TObject ); begin if FPropNotifySink <> nil then FPropNotifySink.OnChanged( DISPID_CAPTION ); end; -----Original Message----- From: Jason Coley Sent: Friday, 27 July 2001 9:26 To: Multiple recipients of list delphi Subject: RE: RE: [DUG]: ActiveX control not binding? Well I found the bindalbe parts in the type library, but its still not binding!? -----Original Message----- From: Jason Coley Sent: Friday, 27 July 2001 9:02 To: Multiple recipients of list delphi Subject: RE: [DUG]: ActiveX control not binding? I just received an email from another group telling me that Delphi does not make properties by default binadable, so how would I do this manually? -----Original Message----- From: Jason Coley Sent: Wednesday, 25 July 2001 2:32 To: Multiple recipients of list delphi Subject: RE: RE: [DUG]: ActiveX control not binding? Is there anything I need to know to make a control update its binding with the application that runs it? -----Original Message----- From: Jason Coley Sent: Wednesday, 25 July 2001 10:45 a.m. To: Multiple recipients of list delphi Subject: RE: [DUG]: ActiveX control not binding? Does anyone know anything about a problem like this? Or maybe help with a solution? Jason -----Original Message----- From: Jason Coley Sent: Tuesday, 24 July 2001 10:02 a.m. To: Multiple recipients of list delphi Subject: [DUG]: ActiveX control not binding? Hi, I have made an activeX form that has two controls, one is the DevX calendar control and one is a combo box. I am making a date/time control similar to how Outlook does it, for use in Outlook custom forms. Now I set a value (TDateTime) using the two controls, but for some reason I am having difficulty with the control, as it doesn't seem to bind to date time fields in Outlook? Has anyone had any experience with Outlook and activeX controls? Or maybe have a look at the control code to see if I am doing anything wrong? Regards Jason Coley Manawatu Software Solutions http://www.software-solutions.co.nz <http://www.software-solutions.co.nz/> ------------------------------------------------------------------------ --- New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED] Website: http://www.delphi.org.nz To UnSub, send email to: [EMAIL PROTECTED] with body of "unsubscribe delphi" Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/ ------------------------------------------------------------------------ --- New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED] Website: http://www.delphi.org.nz To UnSub, send email to: [EMAIL PROTECTED] with body of "unsubscribe delphi" Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/ ------------------------------------------------------------------------ --- New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED] Website: http://www.delphi.org.nz To UnSub, send email to: [EMAIL PROTECTED] with body of "unsubscribe delphi" Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/ ------------------------------------------------------------------------ --- New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED] Website: http://www.delphi.org.nz To UnSub, send email to: [EMAIL PROTECTED] with body of "unsubscribe delphi" Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/ ------------------------------------------------------------------------ --- New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED] Website: http://www.delphi.org.nz To UnSub, send email to: [EMAIL PROTECTED] with body of "unsubscribe delphi" Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/ ------------------------------------------------------------------------ --- New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED] Website: http://www.delphi.org.nz To UnSub, send email to: [EMAIL PROTECTED] with body of "unsubscribe delphi" Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/ ------------------------------------------------------------------------ --- New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED] Website: http://www.delphi.org.nz To UnSub, send email to: [EMAIL PROTECTED] with body of "unsubscribe delphi" Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/ --------------------------------------------------------------------------- New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED] Website: http://www.delphi.org.nz To UnSub, send email to: [EMAIL PROTECTED] with body of "unsubscribe delphi" Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/ --------------------------------------------------------------------------- New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED] Website: http://www.delphi.org.nz To UnSub, send email to: [EMAIL PROTECTED] with body of "unsubscribe delphi" Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
