TTreeNode property, Knoten in IDE umsortieren

[BUG]

Endlich habe ich mal die Gelegenheit, die neue Sparte zu nutzen :mrgreen:

Ich habe auf einer Form ein TTreeView, welches die Eigenschaft items: TTreeNode hat.
Nun kann mit dem "Assistenten für TreeView-Einträge" eine Baum basteln.

Frage: Gibt es eine Möglichkeit bereits erstellte Knoten im "Assistenten für TreeView-Einträge" zu verschieben!

MfG,
Bug

[himitsu]

Eintrag mit der linken Maustaste anklicken und Verschieben :angel2:
aka Drag&Drop

[BUG]

Zitat:

Zitat von himitsu

Eintrag mit der linken Maustaste anklicken und Verschieben :angel2:
aka Drag&Drop

Hast du es ausprobiert? Ich schon ... wenn das funktioniert hätte, hätte ich hier nicht gepostet.

Meine Lazarusversion: Lazarus 0.9.26 Beta (Windows) (AFAIK die Neuste)

MfG,
Bug

[Störtebeker]

Nein. Auch ich verwende Lazarus und habe das mit dem Verschieben auch nicht hinbekommen. Also entweder machst du das ganze per Textdatei, in die du den Baum schreibst und dann in dein Programm einfügst, oder die "wahrscheinlich" deutlich aufwendigere Variante ist eine Neuerstellung des gesamten Baumes, sollte dir während der Erstellung des Baumes ein Fehler in der Ordnung auffallen. Somit solltest du dir schon vorher im klaren darüber sein, wie dein Baum aussehen soll.

[himitsu]

Ach mißt, die DP-Link-Zeile hatte ich ganz übersehn ... jupp, probiert, aber im falschen System :oops:

In der dfm brauchst'e auch nicht zu suchen, ich vermute mal selbst in diesen Programmen werden die Items codiert gespeichert.


ansonsten :gruebel:

[BUG]

Speichern und in der Textdatei umsortieren geht, dabei gehen aber die eingestellten Indices (für Icons) verloren.

Naja, halb so schlimm, war nur ein Minibaum ... trotzdem schade das es nicht mit d&d geht :cry:


MfG,
Bug

[himitsu]

Ist in Lazarus DFM (falls die dort nicht anders heißt) genauso aufgebaut, wie in Delphi (irealer Weise als Textversion)?

Da könnte man sich bestimmt recht leicht ein kleines Editprogramm schreiben, was die TreeView dort ausließt und nach der Änderung zurückspeichert.

[BUG]

Wer Lust darauf hat, kann das gerne machen.

Auszug aus der *.lfm:

Code:

    object TreeView1: TTreeView
      Height = 662
      Width = 299
      Align = alClient
      DefaultItemHeight = 17
      Images = il_addons
      StateImages = il_addons
      TabOrder = 0
      Items.Data = {
        F9FFFFFF02000600000000000000FFFFFFFFFFFFFFFFFFFFFFFF000000000000
        00000003000000416C6C01000000FFFFFFFFFFFFFFFFFFFFFFFF000000000000
        0000000600000041637469766502000000FFFFFFFFFFFFFFFFFFFFFFFF000000
        00000000000009000000496E7374616C6C656403000000FFFFFFFFFFFFFFFFFF
        FFFFFF00000000000000000009000000417661696461626C6504000000FFFFFF
        FFFFFFFFFFFFFFFFFF0000000000000000000D0000004E6F7420617661696461
        626C650500000005000000FFFFFFFFFFFFFFFF00000000000000000007000000
        556E6B6E6F776E
      }
    end

Aber im Assistenten kann man als Textdatei importieren/exportieren.

Zitat:

Zitat von erst kritisieren

(irealer Weise als Textversion)

Zitat:

Zitat von und das dann wiederlegen

Da könnte man ... recht leicht ein kleines Editprogramm schreiben ...

:mrgreen:


MfG,
Bug

[himitsu]

jupp, nun braucht man nur eine TreeView und importiert bei dieser das Items.Data und schon hat man den Baum in einer anderen TreeView :roll:

[himitsu]

Falls Lazarus kein anderes Format nutzt

Delphi-Quellcode:

object TreeView1: TTreeView 
  ...
  Items.Data = {
          F9FFFFFF02000600000000000000FFFFFFFFFFFFFFFFFFFFFFFF000000000000
          ....
          626C650500000005000000FFFFFFFFFFFFFFFF00000000000000000007000000
          556E6B6E6F776E
  } 
end

einfach den HEX-Code zwischen Items.Data={ und } in das Edit einfügen und auf [<<<] drücken.

in Delphi funktioniert es so zumindestens

dann nur noch die Methoden zum Sortieren und zum wieder Digitalisieren einbauen und fertig.
( eventuell noch ein Im-/Export zur .lfm/.dfm )