TShellTreeView in Delphi3 nachbauen?

[mirage228]

Hallo,

ich wollte gerne die ShellTreeview aus Delphi 6 irgendwie in Delphi 3 benutzen (oder zumindest etwas, was dem ShellTreeView in Design und Funktionalität ähnlich ist). Ich wollte nur im Notfall alles selbst in Delphi 3 nachbauen.

Meine Frage lautet nun, in wie weit das machbar bzw. möglich ist!

Wäre dankbar für ein paar Tipps!

mfG
mirage228

[Giantics]

Ich hab solche Kompos selber gecodet :lol: Wenn du willst kann ich sie dir mailen.

[mirage228]

Hi,

das wäre echt nett, wenn du sie mir schicken würdest!

Meine Adresse: [e-mail]

mfG
mirage228

[Giantics]

*AOL-Stimme:* Sie haben Post

[Daniel B]

Zitat:

Zitat von Giantics

*AOL-Stimme:* Sie haben Post

Schön das Du uns da alle dran teilhaben lässt. :roll:

[mirage228]

Hi,

nach ein paar kleinen Modifikationen (D3 kannte IncludeTrailingBackslash noch nicht --> nachgebaut) funktioniert die TreeView jetzt wie gewünscht. Beim hinzufügen der ListView auf das Formular kriege ich jedoch die Fehlermeldung 'Element " hat kein übergeordnetes Fenster' (tritt auch beim dynamischen erstellen auf(. Die ListView könnte ich noch gut gebrauchen, wenn die aber nicht funkt, ist auch nicht so schlimm.

Vielen Dank nochmal für deine Hilfe.

mfG
mrage228

[Giantics]

@Mirrage228:
Also das ListView funktioniert bei mir ohne solche Probleme, und die Fehlermeldung hört sich nach Fehler im Constructor an, müsste aber alles stimmen. Vielleicht kann jemand anderes sich die Unit noch ansehen und findet raus, wieso die in D3 nicht geht :gruebel: .

@Daniel B:

Zitat:

Schön das Du uns da alle dran teilhaben lässt.

Sorry, aber ich bin noch das Spotlight.de-Forum gewöhnt, da kann man halt nix uploaden. :?
Is schon genial hier was es alles für Funktionen gibt: Delphi-Quellcode/Upload/Zitat/...
Kein Wunder dass dort ein bisserl die Leute weglaufen :mrgreen: .

Also, wer die Unit haben will, einfach downloaden:

[mirage228]

Hi Giantics, wenn ich einen Haltepunkt auf eine Zeile im Constructor des Multifilelistview setze und starten will, erhalte ich die Warnung:

"Es wurde ein Haltepunkt auf eine Zeile gesetzt, die wegoptimiert wurde oder keine Debugsinfos enthält. Trotzdem starten?"

Das ist mir doch schon etwas suspekt.

EDIT:
So scheint es zu funktionieren:

Delphi-Quellcode:

var
  X: TMultiFileListView;
begin
  X := TMultiFileListView.CreateParented(Application.Handle);
  X.Parent := Form1;

Jedoch erscheint die ListView dann immer oben rechts in der Ecke....und lässt sich nicht in den Bounds verändern.

mfG
mirag228

[Giantics]

Seltsam :?:

Zitat:

Jedoch erscheint die ListView dann immer oben rechts in der Ecke....und lässt sich nicht in den Bounds verändern.

Also das funktioniert bei mir, wenn ich die Koordinaten ändere.

Zitat:

Hi Giantics, wenn ich einen Haltepunkt auf eine Zeile im Constructor des Multifilelistview setze und starten will, erhalte ich die Warnung:

Welche Zeile genau?

Da hab ich grad wieder das Problem, dass ich die unit nicht debuggen kann, weil er, egal wo ich einen Haltepunkt setze, ihn beim starten grün(deaktiviert) macht. Delphi kapiert wohl nicht, dass das die Unit der Komponente ist. Wie krieg ich das hin?

[mirage228]

Zitat:

Zitat von Giantics

Da hab ich grad wieder das Problem, dass ich die unit nicht debuggen kann, weil er, egal wo ich einen Haltepunkt setze, ihn beim starten grün(deaktiviert) macht. Delphi kapiert wohl nicht, dass das die Unit der Komponente ist. Wie krieg ich das hin?

In jeder Zeile meint der Compiler das bei mir. Ist genau das gleiche Problem, dass du beschrieben hast...

mfG
mirage228