Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hawkeye219,
10. Feb 2008
Hallo Kostas,
hast du das Flag "TreeOptions.AutoOptions.toAutoDeleteMovedNodes" auf den Wert False gesetzt?
Gruß Hawkeye
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hawkeye219,
10. Feb 2008
Hallo Kostas,
der gewünschte Knoten wird dir zwar nicht übergeben, du kannst ihn aber über die Koordinaten des Mauszeigers ermitteln:
procedure TForm1.VSTDragOver(Sender: TBaseVirtualTree; Source: TObject;
Shift: TShiftState; State: TDragState; Pt: TPoint; Mode: TDropMode;
var Effect: Integer; var Accept: Boolean);
var
Node : PVirtualNode;