vcl-dxganttcontrolviewchart-78db78d2.md
Performs a set of actions in response to task movement completion.
TdxGanttControlTaskEndMoveEvent = procedure(Sender: TObject; ATask: TdxGanttControlTask) of object;
| Name | Type | Description |
|---|---|---|
| Sender | TObject |
The Chart View that raised the event.
| | ATask | TdxGanttControlTask |
The moved task.
|
You can open the Features Demo and modify its code. Handle the OnTaskEndMove event and use the following code snippet to display the message that shows the rearranged task’s new start date:
procedure TFeaturesDemoMainForm.GanttControlViewChartTaskEndMove(Sender: TObject;
ATask: TdxGanttControlTask);
begin
ShowMessage('The "' + ATask.Name + '" task starts on ' + DateTimeToStr(ATask.Start) + 'now');
end;
void __fastcall TFeaturesDemoMainForm::GanttControlViewChartTaskEndMove(TObject *Sender,
TdxGanttControlTask *ATask)
{
ShowMessage("The '" + ATask->Name + "' task starts on " + DateTimeToStr(ATask->Start) + " now");
}
See Also