Forum: Object-Pascal / Delphi-Language
by Aviator,
10. Mai 2017
Moin,
ich habe mir deinen Code zwar jetzt nicht eingebaut, aber du solltest beim OnGetImageIndex() Event folgendes beachten:
Prüfe immer den ImageKind der übergeben wird. Es gibt insgesamt 4 (?) Typen. (Habe den Source gerade nicht vorliegen, daher aus dem Kopf)
ikNormal, // Wird angezeigt wenn die Node keinen speziellen Zustand hat
ikSelected, // Wird angezeigt wenn die Node ausgewählt...
Forum: Object-Pascal / Delphi-Language
by Aviator,
9. Mai 2017
Hallo SneakyBagel,
letzter Beitrag für heute :-D
Du machst da noch etwas falsch. Du darfst die ShellIcons nur 1x laden. Also z.B. in der LoadDirectories Methode. Spendiere der TDirectory Klasse dann zusätzlich noch eine Property ImageIndex. Beim Auslesen der Verzeichnisse lädtst du dann nur noch 1x das Icon.
Im GetImageIndex Event gibst du dem Tree immer nur noch den Index des Icons in...
Forum: Object-Pascal / Delphi-Language
by Aviator,
9. Mai 2017
Hallo zusammen,
ich habe jetzt mal ein kleines Demo-Projekt zusammengebastelt und auch mit ein paar Kommentaren versehen. Natürlich wird hier nur ein ganz kleiner Teil der Funktionen des VST gezeigt. Aber für den Einstieg sollte das erst einmal reichen.
Wenn du das problemlos programmieren kannst, dann kannst du dich an die tieferen Funktionen des VST wagen.
Ich habe in dem Beispiel...
Forum: Object-Pascal / Delphi-Language
by Aviator,
9. Mai 2017
Also könnte man das Beispiel mit dem Aufbau eines Verzeichnisbaumes vom Laufwerk C: durchführen? Ich schau mal ob ich die Zeit dazu finde und poste dementsprechend mal etwas.
Forum: Object-Pascal / Delphi-Language
by Aviator,
9. Mai 2017
Das sollte das geringere Problem darstellen. Beim VST sind diverse gute Demos dabei um wenigstens mal die Basics zu erlernen.
Wenn ich heute abend noch Zeit habe, dann bastele ich dir mal etwas ganz kleines zusammen bei dem du wenigstens mal die Nodes erstellen und die Texte anzeigen lassen kannst.
Den CheckSupport (also Anzeige von CheckBoxen) kann man dann noch nachträglich hinzufügen.
...