Delphi-PRAXiS - Delphi eigene Spalten in VirtualTreeView

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)

- - Delphi eigene Spalten in VirtualTreeView (https://www.delphipraxis.net/135814-eigene-spalten-virtualtreeview.html)

eigene Spalten in VirtualTreeView

Hallo,

Weiß Jemand wie man im VirtualTreeView eigene Spaltenformate definieren kann?

Möchte zum Beispiel eine Spalte mit nem Tridtot-Button in jeder Zeile haben um ne Datei auszuwählen. Links daneben soll ein TEdit-Feld in der selben Spalte sein.

Re: eigene Spalten in VirtualTreeView

Dabei hilft dir unter anderem das Ereignis OnCreateEditor. ;-)

Dort musst du eine Instanz einer Editorklasse zurückgeben, die das Interface IVTEditLink implementiert. Schau dir dazu auch einmal die ganzen Downloads an, für diesen Fall vor allem "Virtual Treeview (editors)".

Dazu die Demos wie z.B. "Microsoft property editor clone".

Re: eigene Spalten in VirtualTreeView

Beim IVTEditLink-Beispiel ist schon alles dabei was ich brauchen würde, aber ich krieg das nicht mehr installiert, weil es sicher schon zu alt ist.

Folgender Fehler tritt auf:

Zitat:

[DCC Fataler Fehler] VirtualTreesD5.dpk(41): F1026 Datei nicht gefunden: 'VirtualTreesReg.dcu'

Weiß nicht wo ich die Datei hernehmen soll, da sie nicht mehr enthalten ist bei VST.

Re: eigene Spalten in VirtualTreeView

Also bei mir kommt nur VirtualEditTreeReg fehle. Was aber auch kein Wunder ist, weil in der Projektdatei (.dpk, Projekt -_> Quelltext anzeigen) ein seltsames relatives Verzeichnis drin ist. Bei mir (D2006) funktioniert es so problemlos, wobei in der Zeile mit VirtualTreesD10 bei dir dann wohl VirtualTreesD5 hingehört (sonst lösch das einfach, Delphi fragt dann):

Delphi-Quellcode:

			package VirtualEditTreeD6;

{$R *.res}

{$R 'VirtualEditTree.dcr'}

{$ALIGN 8}

{$ASSERTIONS ON}

{$BOOLEVAL OFF}

{$DEBUGINFO ON}

{$EXTENDEDSYNTAX ON}

{$IMPORTEDDATA ON}

{$IOCHECKS ON}

{$LOCALSYMBOLS ON}

{$LONGSTRINGS ON}

{$OPENSTRINGS ON}

{$OPTIMIZATION OFF}

{$OVERFLOWCHECKS ON}

{$RANGECHECKS ON}

{$REFERENCEINFO OFF}

{$SAFEDIVIDE OFF}

{$STACKFRAMES OFF}

{$TYPEDADDRESS OFF}

{$VARSTRINGCHECKS ON}

{$WRITEABLECONST OFF}

{$MINENUMSIZE 1}

{$IMAGEBASE $30400000}

{$DESCRIPTION 'Virtual Treeview'}

{$IMPLICITBUILD ON}

requires

  rtl,

  dclstd,

  VclSmp,

  VirtualTreesD10;

contains

  VirtualEditTreeReg in 'VirtualEditTreeReg.pas',

  VirtualEditTree in 'VirtualEditTree.pas',

  VTEditors in 'VTEditors.pas';

end.

Re: eigene Spalten in VirtualTreeView

Ok, jetzt habe ich das auch hinbekommen.

Die Frage ist nur wie man jetzt Spalten die diese Editier-Funktionen haben erzeugt?
Beim Anlegen von Spalten sehe ich zwar das Property 'EditLink', aber egal was ich anklicke (z.B. Check oder Combo) ich anklicke, es steht stets nur '<not available>' in dem Feld.

OT: Sag mal schmeißt du das Board jetzt ganz allein jaenicke?