Skip to main content

TdxGanttControlTaskStartLinkEvent Type

Performs a set of actions before a user drags and drops a dependency from one task to another with the mouse.

Declaration

TdxGanttControlTaskStartLinkEvent = procedure(Sender: TObject; ATask: TdxGanttControlTask; var AAllow: Boolean) of object;

Parameters

Name Type Description
Sender TObject

The Chart View that raised the event.

ATask TdxGanttControlTask

The predecessor task.

AAllow Boolean

If True, a user can move the mouse pointer from the selected task to another task (while holding the left mouse button) to link them. If False, the operation is prohibited.

Remarks

You can open the Features Demo and modify its code. Handle the OnTaskStartLink event and use the following code snippet to prevent a user from linking a summary task to any task:

procedure TFeaturesDemoMainForm.GanttControlViewChartTaskStartLink(Sender: TObject;
  ATask: TdxGanttControlTask; var AAllow: Boolean);
begin
    AAllow := not ATask.Summary;
end;
See Also