Différences
Ci-dessous, les différences entre deux révisions de la page.
| Les deux révisions précédentes Révision précédente Prochaine révision | Révision précédente | ||
|
prog:lazarus:components:tvirtualtreeview:tvirtualtreeview [07/06/2020 17:09] thierry [Parcourir un VST] |
prog:lazarus:components:tvirtualtreeview:tvirtualtreeview [07/05/2023 15:12] (Version actuelle) thierry |
||
|---|---|---|---|
| Ligne 103: | Ligne 103: | ||
| <code delphi> | <code delphi> | ||
| + | { Expand un Node } | ||
| VSTMain.Expanded[FRootNode]:=true; | VSTMain.Expanded[FRootNode]:=true; | ||
| + | { Savoir si un Node est expanded } | ||
| + | ExpBool:=VSTMain.Expanded[FRootNode]; | ||
| </code> | </code> | ||
| === Tout === | === Tout === | ||
| Ligne 134: | Ligne 137: | ||
| * [[https://documentation.help/VirtualTreeview/TBaseVirtualTree_Sort@PVirtualNode@TColumnIndex@TSortDirection@Boolean.html|Procédure SORT @Doc Officielle]] | * [[https://documentation.help/VirtualTreeview/TBaseVirtualTree_Sort@PVirtualNode@TColumnIndex@TSortDirection@Boolean.html|Procédure SORT @Doc Officielle]] | ||
| * [[https://documentation.help/VirtualTreeview/TBaseVirtualTree_OnCompareNodes.html|OnCompareNode @DocOfficielle]] | * [[https://documentation.help/VirtualTreeview/TBaseVirtualTree_OnCompareNodes.html|OnCompareNode @DocOfficielle]] | ||
| - | |||
| - | ==== Selection ==== | ||
| - | === GetFirstSelected === | ||
| - | <code delphi> | ||
| - | function TForm1.GetSelectedMarker: TMarker; | ||
| - | var | ||
| - | pNode: PVirtualNode; | ||
| - | pData: PVSTMarkData; | ||
| - | begin | ||
| - | pNode := VSTMark.GetFirstSelected; | ||
| - | if assigned(pNode) then | ||
| - | begin | ||
| - | pData := VSTMark.GetNodeData(pNode); | ||
| - | Result := pData^.Marker; | ||
| - | end else | ||
| - | Result := nil; | ||
| - | end; | ||
| - | |||
| - | |||
| - | </code> | ||
| Ligne 170: | Ligne 153: | ||
| end; | end; | ||
| </code> | </code> | ||
| - | ==== Parcourir un VST ==== | ||
| - | <code delphi> | ||
| - | procedure TFrameMarkerTpls.SetSelectedTpl(ATpl: THO_MarkerTemplate); | ||
| - | var | ||
| - | Data: PTreeData; | ||
| - | Node: PVirtualNode; | ||
| - | begin | ||
| - | VST.ClearSelection; | ||
| - | if assigned(ATpl) then | ||
| - | begin | ||
| - | Node := VST.GetFirst; | ||
| - | while Assigned(Node) do | ||
| - | begin | ||
| - | Data := VST.GetNodeData(Node); | ||
| - | if Data^.Style=AValue then | ||
| - | begin | ||
| - | VST.Selected[Node]:=true; | ||
| - | break; | ||
| - | end else | ||
| - | Node := VST.GetNextSibling(Node); | ||
| - | end; | ||
| - | end; | ||
| - | end; | ||
| - | |||
| - | </code> | ||
| - | |||
| - | |||
| - | |||
| ==== Déstruction du VST ==== | ==== Déstruction du VST ==== | ||
| === OnFreeNode === | === OnFreeNode === | ||
| Ligne 229: | Ligne 184: | ||
| - | ===== Ressources ===== | + | ===== Sources et Ressources ===== |
| * [[https://jlelong.developpez.com/articles/virtualtreeview/]] | * [[https://jlelong.developpez.com/articles/virtualtreeview/]] | ||
| * [[https://documentation.help/VirtualTreeview/$Main.html]] | * [[https://documentation.help/VirtualTreeview/$Main.html]] | ||