event CreatePool (Pool as Pool)
The user creates at runtime a new pool.

TypeDescription
Pool as Pool An Pool object being created.
The CreatePool event occurs when the user creates the pool on the surface. The AllowCreatePool property specifies the keys combination to let the user creates the pools at runtime. Prior to CreatePool event the AddPool event is fired to notify that the pool has been added to the Pools collection. The CreatePool event is not fired when you add programmatically the pool calling the Add method. You can call the Remove method to remove the newly created pool.

The order of the events when the user creates the pool at runtime is:

The CreatePool event is not called during the LoadXML method.

Syntax for CreatePool event, /NET version, on: 

private void CreatePool(object sender,exontrol.EXSWIMLANELib.Pool Pool)
{
}


Private Sub CreatePool(ByVal sender As System.Object,ByVal Pool As exontrol.EXSWIMLANELib.Pool) Handles CreatePool
End Sub

Syntax for CreatePool event, /COM version, on: 

private void CreatePool(object sender, AxEXSWIMLANELib._ISwimLaneEvents_CreatePoolEvent e)
{
}


void OnCreatePool(LPDISPATCH Pool)
{
}


void __fastcall CreatePool(TObject *Sender,Exswimlanelib_tlb::IPool *Pool)
{
}


procedure CreatePool(ASender: TObject; Pool : IPool);
begin
end;


procedure CreatePool(sender: System.Object; e: AxEXSWIMLANELib._ISwimLaneEvents_CreatePoolEvent);
begin
end;


begin event CreatePool(oleobject Pool)
end event CreatePool


Private Sub CreatePool(ByVal sender As System.Object, ByVal e As AxEXSWIMLANELib._ISwimLaneEvents_CreatePoolEvent) Handles CreatePool
End Sub


Private Sub CreatePool(ByVal Pool As EXSWIMLANELibCtl.IPool)
End Sub


Private Sub CreatePool(ByVal Pool As Object)
End Sub


LPARAMETERS Pool



PROCEDURE OnCreatePool(oSwimLane,Pool)
RETURN

Syntax for CreatePool event, /COM version (others), on: 

<SCRIPT EVENT="CreatePool(Pool)" LANGUAGE="JScript">
</SCRIPT>


<SCRIPT LANGUAGE="VBScript">
Function CreatePool(Pool)
End Function
</SCRIPT>


Procedure OnComCreatePool Variant llPool
	Forward Send OnComCreatePool llPool
End_Procedure


METHOD OCX_CreatePool(Pool) CLASS MainDialog
RETURN NIL


void onEvent_CreatePool(COM _Pool)
{
}


function CreatePool as v (Pool as OLE::Exontrol.SwimLane.1::IPool)
end function


function nativeObject_CreatePool(Pool)
return

The following VB sample shows only the top header of the pool when the user creates a pool :

Private Sub SwimLane1_CreatePool(ByVal Pool As EXSWIMLANELibCtl.IPool)
    With Pool
        .HeaderVisible(exHeaderTop) = True
        .HeaderVisible(exHeaderBottom) = False
        .HeaderVisible(exHeaderLeft) = False
        .HeaderVisible(exHeaderRight) = False
    End With
End Sub

The following VB sample adds by default 4-horizontal lanes when user creates a pool at runtime:

Private Sub SwimLane1_CreatePool(ByVal Pool As EXSWIMLANELibCtl.IPool)
    With Pool
        .Lane(exLaneHorizontal).Children.Count = 4
        .HeaderVisible(exHeaderTop) = False
        .HeaderVisible(exHeaderBottom) = False
        .HeaderVisible(exHeaderLeft) = True
        .HeaderVisible(exHeaderRight) = False
    End With
End Sub