Filelistbox -> [..] auswählen um eine Ebene höher zu kommen.

[happycell]

Hi, wie kann ich es einstellen, dass man in der Filelistbox auf "[..]" und [.] klicken kann um in dieser Filelistbox eine Ebene in der Ordnerstruktur nach oben zu kommen. Und wie kann ich in einer Filelistbox auf einen Ordner klicken, so dass er sich auch in diesem Fenster öffnet.

[XeRo]

Ob du das einstellen kannst weiß ich nicht, aber ich würde es manuell programmieren...
frag mich jetzt nicht, wie genau das aussehen müsste.
Ein paar if's und then's. :drunken:

[happycell]

Hint: Deine Antwort hilft mir nicht. :(

[XeRo]

sorry...aber dabei wurde dein Eintrag wenigstens wieder auf platz eins gerufen... :|

[happycell]

Achso, danke, wusste das nicht, dass es hier so läuft, naja, wieder auf platz eins

[APP]

Hallo happycell,

Zitat:

Zitat von happycell

Hi, wie kann ich es einstellen, dass man in der Filelistbox auf "[..]" und [.] klicken kann um in dieser Filelistbox eine Ebene in der Ordnerstruktur nach oben zu kommen. Und wie kann ich in einer Filelistbox auf einen Ordner klicken, so dass er sich auch in diesem Fenster öffnet.

Mal schnell hingezimmert:

Delphi-Quellcode:

PROCEDURE TForm1.FileListBox1Click(Sender: TObject);
VAR
  s                                : STRING;
BEGIN
  WITH FileListBox1 DO
    BEGIN
      s := ExtractFileName(FileName);
      IF s = '[..]' THEN
        // Directory nach oben...
        // Da musst Du Dir noch etwas einfallen lassen :-)
        Directory := 'c:\'             
      ELSE IF s[Length(s)] = ']' THEN
        // Directory wird in der Listbox geöffnet 
        Directory := IncludeTrailingBackslash(Directory) + copy(s, 2, length(s) - 2);
    END;
END;

[APP]

[OT]
Hallo happycell,

Zitat:

Zitat von happycell

Achso, danke, wusste das nicht, dass es hier so läuft, naja, wieder auf platz eins

genau so läuft es bei uns nicht!

Wir hatten vor kurzem eine angeregte Disskusion über das Pushen von (eigenen) Threads,
das wird hier gar nicht gerne gesehen, auch nicht wenn es ein Anderer für Dich macht.

Sei geduldig, warte mal 24h ab, oft wurde Dir dann schon geholfen... :cheers:
[/OT]