Registriert seit: 22. Feb 2017
955 Beiträge
|
AW: VST eingebettete Controls erst bei MouseEnter sichtbar
6. Mai 2017, 08:47
In einer eigenen Procedure:
Delphi-Quellcode:
var
i, e: Integer;
node, enode: PVirtualNode;
begin
vrtlstrngtr1.BeginUpdate;
try
vrtlstrngtr1.Clear;
for i:=0 to Rooms.Count-1 do
begin
node:=vrtlstrngtr1.AddChild(nil, Rooms[i]);
for e:=0 to Rooms[i].Elements.Count-1 do
begin
enode:=vrtlstrngtr1.AddChild(node, Rooms[i].Elements[e]);
end;
end;
vrtlstrngtr1.FullExpand;
// node:=vrtlstrngtr1.GetFirst;
// while node<>nil do
// begin
// if node<>vrtlstrngtr1.RootNode then
// begin
// DoResize(node);
// end;
// node:=vrtlstrngtr1.GetNextVisible(node);
// end;
tmr1.Enabled:=True;
finally
vrtlstrngtr1.EndUpdate;
//vrtlstrngtr1.Repaint;
//vrtlstrngtr1.Update;
end;
end;
Wie man an den auskommentierten Codestellen sieht habe ich hier schon rumprobiert, allerdings erfolglos.
Gruß Hobbycoder
Alle sagten: "Das geht nicht.". Dann kam einer, der wusste das nicht, und hat's einfach gemacht.
|