TdxGanttControlTaskStartResizeEvent Type

Performs a set of actions to prevent users from changing a task‘s width with the mouse.

Declaration

TdxGanttControlTaskStartResizeEvent = 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 task whose finish date is about to be changed.
AAllow	Boolean	If True, a user can resize tasks in the chart. If False, the operation is prohibited.

Remarks

You can open the Features Demo and modify its code. Handle the OnTaskStartResize event and use the following code snippet to restrict users from resizing summary tasks and milestones:

Delphi

procedure TFeaturesDemoMainForm.GanttControlViewChartTaskStartResize(Sender: TObject; ATask: TdxGanttControlTask; var AAllow: Boolean);
begin
  AAllow := not (ATask.Summary or ATask.Milestone);
end; 

C++

void __fastcall TFeaturesDemoMainForm::GanttControlViewChartTaskStartResize(TObject *Sender,
          TdxGanttControlTask *ATask, bool &AAllow)
{
  AAllow = !(ATask->Summary) || (ATask->Milestone);
}