Forum: Programmieren allgemein
by mm1256,
29. Jan 2015
Leider kein vollständiges Beispiel, hatte nur mal kurz einen Blick auf die Source geworfen und gesehen, dass GetResults für die Rückgabe der FileList verantwortlich ist. Demzufolge müsste es in etwa so klappen:
type
TMyFileOpenDialog = class(TCustomFileDialog)
...
function GetResults: HResult; override;
...
end;
Forum: Programmieren allgemein
by mm1256,
29. Jan 2015
Richtig! Ich hab ja auch nicht behauptet, dass es ohne Änderung geht. ("GetResults" überschreiben....)
Forum: Programmieren allgemein
by mm1256,
28. Jan 2015
Gibt es einen besonderen Grund, warum nimmst du keinen TFileOpenDialog (mit MultiSelect unmd Ordnerauswahl in den Options) nimmst?