Directoy-Dialog ?

[MathiasSimmack]

Zitat von Christian S.:

Zitat von Luckie:

Hier habe ich das mal in eine Klasse gpackt: http://www.luckie-online.de/Delphi/Sonstiges/

Naja, ein paar mehr Leute waren schon beteiligt

Woll´n wir den Typen verklagen?


@Nisbo: http://www.luckie-online.de/Delphi/S...rFolderCls.pas

[Luckie]

Zitat von Christian S.:

Zitat von Luckie:

Hier habe ich das mal in eine Klasse gpackt: http://www.luckie-online.de/Delphi/Sonstiges/

Naja, ein paar mehr Leute waren schon beteiligt

Nun ja, aber ich war auch beteiligt und das ursprüngliche Copyright Vermerk steht auch im Code:

Zitat:

Delphi-Quellcode:

// TFolderBrowser-Klasse
// Copyright (c) 2003/2004 Delphi-Forum
// Tino, Popov, "Peter Lustig" (PL), Luckie, Aton, Mathias Simmack (msi)

[MathiasSimmack]

Viel war´s nicht.

Code:

[color=green]// -- Revision history ---------------------------------------------------------
//
//   * ursprüngliche Version von PL (s. Link #3)
[b]//   * Fehlerkorrekturen von Luckie
//       - Result bei Callback ergänzt
//       - Properties als private deklariert
//       - Bugs in "Execute"-Methode behoben[/b]
//   * Dateifilter in Callback-Funktion
//       - Idee (Aton)
//       - globale Stringvariable (msi)
//       - TFolderBrowser-Klasse (PL)
//   * Unterstützung für mehrere Filter ergänzt (msi)
//   * Unterstützung für verschiedene Root-Ordner (msi)
//   * Änderungen bei den Properties (msi)
//       - "SelFolder" in "SelectedItem" umbenannt
//       - "FNewFolder" als "NewFolderButton" verfügbar
//       - "FShowFiles" als "ShowFiles" verfügbar
//       - "FNoTT" als "NoTargetTranslation" verfügbar (XP-Flag)
//   * Funktion zum Ermitteln von Verknüpfungszielen ergänzt (msi)
//       - Ergänzung, um Umgebungsvariablen umzuwandeln
//   * "InitFolder" (s. Create) umbenannt in "PreSelectedFolder" (PL)
//
// -----------------------------------------------------------------------------[/color]