HPW wrote:So any timeline to release 2.1?
elias wrote:OnObjectChange: TGraphNotifyEvent;
TGraphNotifyEvent = procedure(Graph: TSimpleGraph; GraphObject: TGraphObject) of object;
Occurs when a graph object is changed.
---
Changed in wich way?
procedure MergeGraph(SimpleGraph: TSimpleGraph; const FileName: String;
OffsetX, OffsetY: Integer);
var
OldObjectCount: Integer;
I: Integer;
begin
with SimpleGraph do
begin
BeginUpdate;
try
OldObjectCount := Objects.Count;
LoadFromFile(FileName, True);
for I := OldObjectCount to Objects.Count - 1 do
Objects[I].Selected := True;
with Objects[Objects.Count - 1] do
begin
BeginDrag(Point(Left, Top), GHT_CLIENT);
DragBy(OffsetX, OffsetY, False);
EndDrag(True);
end;
ClearSelection;
finally
EndUpdate;
end;
end;
end;
HPW wrote:Thanks for the code. Will be usefull when moving to 2.1!
Can you clarify how the new data-property can be used?
Is it possibel to store a stringlist for example with the node-object?
Something like attaching a user-defined property list?
Return to DELPHI AREA Projects
Users browsing this forum: No registered users and 0 guests