Type | Description | |||
AnchorID as String | A string expression that specifies the identifier of the anchor being clicked. For instance if you have a <a id;options>anchor</a>, the id is the AnchorID, while the options is passed to the Options parameter. | |||
Options as String | A string expression that specifies the options being used in the <a ;options> declaration. |
Currently, the recognizable anchors elements are in the event's body, by using the <a> elements in the LongLabel or ExtraLabel property.
Syntax for AnchorClick event, /NET version, on:
private void AnchorClick(object sender,string AnchorID,string Options) { } Private Sub AnchorClick(ByVal sender As System.Object,ByVal AnchorID As String,ByVal Options As String) Handles AnchorClick End Sub |
private void AnchorClick(object sender, AxEXSCHEDULELib._IScheduleEvents_AnchorClickEvent e) { } void OnAnchorClick(LPCTSTR AnchorID,LPCTSTR Options) { } void __fastcall AnchorClick(TObject *Sender,BSTR AnchorID,BSTR Options) { } procedure AnchorClick(ASender: TObject; AnchorID : WideString;Options : WideString); begin end; procedure AnchorClick(sender: System.Object; e: AxEXSCHEDULELib._IScheduleEvents_AnchorClickEvent); begin end; begin event AnchorClick(string AnchorID,string Options) end event AnchorClick Private Sub AnchorClick(ByVal sender As System.Object, ByVal e As AxEXSCHEDULELib._IScheduleEvents_AnchorClickEvent) Handles AnchorClick End Sub Private Sub AnchorClick(ByVal AnchorID As String,ByVal Options As String) End Sub Private Sub AnchorClick(ByVal AnchorID As String,ByVal Options As String) End Sub LPARAMETERS AnchorID,Options PROCEDURE OnAnchorClick(oSchedule,AnchorID,Options) RETURN |
<SCRIPT EVENT="AnchorClick(AnchorID,Options)" LANGUAGE="JScript"> </SCRIPT> <SCRIPT LANGUAGE="VBScript"> Function AnchorClick(AnchorID,Options) End Function </SCRIPT> Procedure OnComAnchorClick String llAnchorID String llOptions Forward Send OnComAnchorClick llAnchorID llOptions End_Procedure METHOD OCX_AnchorClick(AnchorID,Options) CLASS MainDialog RETURN NIL void onEvent_AnchorClick(str _AnchorID,str _Options) { } function AnchorClick as v (AnchorID as C,Options as C) end function function nativeObject_AnchorClick(AnchorID,Options) return |
The following samples adds a <a rem>remove</a> to all events:
VBA (MS Access, Excell...)
With Schedule1 .DefaultEventLongLabel = "<%=%256%><br><a rem>remove</a>" End With
VB6
With Schedule1 .DefaultEventLongLabel = "<%=%256%><br><a rem>remove</a>" End With
VB.NET
With Exschedule1 .DefaultEventLongLabel = "<%=%256%><br><a rem>remove</a>" End With
VB.NET for /COM
With AxSchedule1 .DefaultEventLongLabel = "<%=%256%><br><a rem>remove</a>" End With
C++
/* Copy and paste the following directives to your header file as it defines the namespace 'EXSCHEDULELib' for the library: 'ExSchedule 1.0 Control Library' #import <ExSchedule.dll> using namespace EXSCHEDULELib; */ EXSCHEDULELib::ISchedulePtr spSchedule1 = GetDlgItem(IDC_SCHEDULE1)->GetControlUnknown(); spSchedule1->PutDefaultEventLongLabel(L"<%=%256%><br><a rem>remove</a>");
C++ Builder
Schedule1->DefaultEventLongLabel = L"<%=%256%><br><a rem>remove</a>";
C#
exschedule1.DefaultEventLongLabel = "<%=%256%><br><a rem>remove</a>";
JavaScript
<OBJECT classid="clsid:9B09E13D-7A88-4299-9DBE-383380435377" id="Schedule1"></OBJECT>
<SCRIPT LANGUAGE="JScript">
Schedule1.DefaultEventLongLabel = "<%=%256%><br><a rem>remove</a>";
</SCRIPT>
C# for /COM
axSchedule1.DefaultEventLongLabel = "<%=%256%><br><a rem>remove</a>";
X++ (Dynamics Ax 2009)
public void init()
{
;
super();
exschedule1.DefaultEventLongLabel("<%=%256%><br><a rem>remove</a>");
}
Delphi 8 (.NET only)
with AxSchedule1 do
begin
DefaultEventLongLabel := '<%=%256%><br><a rem>remove</a>';
end
Delphi (standard)
with Schedule1 do
begin
DefaultEventLongLabel := '<%=%256%><br><a rem>remove</a>';
end
VFP
with thisform.Schedule1
.DefaultEventLongLabel = "<%=%256%><br><a rem>remove</a>"
endwith
dBASE Plus
local oSchedule
oSchedule = form.Activex1.nativeObject
oSchedule.DefaultEventLongLabel = "<%=%256%><br><a rem>remove</a>"
XBasic (Alpha Five)
Dim oSchedule as P
oSchedule = topparent:CONTROL_ACTIVEX1.activex
oSchedule.DefaultEventLongLabel = "<%=%256%><br><a rem>remove</a>"
Visual Objects
oDCOCX_Exontrol1:DefaultEventLongLabel := "<%=%256%><br><a rem>remove</a>"
PowerBuilder
OleObject oSchedule
oSchedule = ole_1.Object
oSchedule.DefaultEventLongLabel = "<%=%256%><br><a rem>remove</a>"
The following samples displays the identifier of the anchor/<a> being clicked.
VBA (MS Access, Excell...)
' AnchorClick event - Occurs when an anchor element is clicked. Private Sub Schedule1_AnchorClick(ByVal AnchorID As String,ByVal Options As String) With Schedule1 Debug.Print( AnchorID ) End With End Sub
VB6
' AnchorClick event - Occurs when an anchor element is clicked. Private Sub Schedule1_AnchorClick(ByVal AnchorID As String,ByVal Options As String) With Schedule1 Debug.Print( AnchorID ) End With End Sub
VB.NET
' AnchorClick event - Occurs when an anchor element is clicked. Private Sub Exschedule1_AnchorClick(ByVal sender As System.Object,ByVal AnchorID As String,ByVal Options As String) Handles Exschedule1.AnchorClick With Exschedule1 Debug.Print( AnchorID ) End With End Sub
VB.NET for /COM
' AnchorClick event - Occurs when an anchor element is clicked. Private Sub AxSchedule1_AnchorClick(ByVal sender As System.Object, ByVal e As AxEXSCHEDULELib._IScheduleEvents_AnchorClickEvent) Handles AxSchedule1.AnchorClick With AxSchedule1 Debug.Print( e.anchorID ) End With End Sub
C++
// AnchorClick event - Occurs when an anchor element is clicked. void OnAnchorClickSchedule1(LPCTSTR AnchorID,LPCTSTR Options) { /* Copy and paste the following directives to your header file as it defines the namespace 'EXSCHEDULELib' for the library: 'ExSchedule 1.0 Control Library' #import <ExSchedule.dll> using namespace EXSCHEDULELib; */ EXSCHEDULELib::ISchedulePtr spSchedule1 = GetDlgItem(IDC_SCHEDULE1)->GetControlUnknown(); OutputDebugStringW( L"AnchorID" ); }
C++ Builder
// AnchorClick event - Occurs when an anchor element is clicked. void __fastcall TForm1::Schedule1AnchorClick(TObject *Sender,BSTR AnchorID,BSTR Options) { OutputDebugString( L"AnchorID" ); }
C#
// AnchorClick event - Occurs when an anchor element is clicked. private void exschedule1_AnchorClick(object sender,string AnchorID,string Options) { System.Diagnostics.Debug.Print( AnchorID.ToString() ); } //this.exschedule1.AnchorClick += new exontrol.EXSCHEDULELib.exg2antt.AnchorClickEventHandler(this.exschedule1_AnchorClick);
JavaScript
<SCRIPT FOR="Schedule1" EVENT="AnchorClick(AnchorID,Options)" LANGUAGE="JScript"> alert( AnchorID ); </SCRIPT> <OBJECT classid="clsid:9B09E13D-7A88-4299-9DBE-383380435377" id="Schedule1"></OBJECT> <SCRIPT LANGUAGE="JScript"> </SCRIPT>
C# for /COM
// AnchorClick event - Occurs when an anchor element is clicked. private void axSchedule1_AnchorClick(object sender, AxEXSCHEDULELib._IScheduleEvents_AnchorClickEvent e) { System.Diagnostics.Debug.Print( e.anchorID.ToString() ); } //this.axSchedule1.AnchorClick += new AxEXSCHEDULELib._IScheduleEvents_AnchorClickEventHandler(this.axSchedule1_AnchorClick);
X++ (Dynamics Ax 2009)
// AnchorClick event - Occurs when an anchor element is clicked. void onEvent_AnchorClick(str _AnchorID,str _Options) { ; print( _AnchorID ); } public void init() { ; super(); }
Delphi 8 (.NET only)
// AnchorClick event - Occurs when an anchor element is clicked. procedure TWinForm1.AxSchedule1_AnchorClick(sender: System.Object; e: AxEXSCHEDULELib._IScheduleEvents_AnchorClickEvent); begin with AxSchedule1 do begin OutputDebugString( e.anchorID ); end end;
Delphi (standard)
// AnchorClick event - Occurs when an anchor element is clicked. procedure TForm1.Schedule1AnchorClick(ASender: TObject; AnchorID : WideString;Options : WideString); begin with Schedule1 do begin OutputDebugString( AnchorID ); end end;
VFP
*** AnchorClick event - Occurs when an anchor element is clicked. ***
LPARAMETERS AnchorID,Options
with thisform.Schedule1
DEBUGOUT( AnchorID )
endwith
dBASE Plus
/* with (this.ACTIVEX1.nativeObject) AnchorClick = class::nativeObject_AnchorClick endwith */ // Occurs when an anchor element is clicked. function nativeObject_AnchorClick(AnchorID,Options) local oSchedule oSchedule = form.Activex1.nativeObject ? Str(AnchorID) return local oSchedule oSchedule = form.Activex1.nativeObject
XBasic (Alpha Five)
' Occurs when an anchor element is clicked.
function AnchorClick as v (AnchorID as C,Options as C)
Dim oSchedule as P
oSchedule = topparent:CONTROL_ACTIVEX1.activex
? AnchorID
end function
Dim oSchedule as P
oSchedule = topparent:CONTROL_ACTIVEX1.activex
Visual Objects
METHOD OCX_Exontrol1AnchorClick(AnchorID,Options) CLASS MainDialog // AnchorClick event - Occurs when an anchor element is clicked. OutputDebugString(String2Psz( AsString(AnchorID) )) RETURN NIL
PowerBuilder
/*begin event AnchorClick(string AnchorID,string Options) - Occurs when an anchor element is clicked.*/ /* OleObject oSchedule oSchedule = ole_1.Object MessageBox("Information",string( String(AnchorID) )) */ /*end event AnchorClick*/ OleObject oSchedule oSchedule = ole_1.Object