Naja, das Objekt, das da übergeben wird (OpenDialog.Files.Text), ist ja auch keine TStringList, insofern ist der Typecast sogar falsch.
Wieso?
OpenDialog.Files ist zwar als
TStrings deklariert, aber:
Delphi-Quellcode:
SelectedFiles := OpenDialog.Files;
...
property Files: TStrings read GetFiles;
...
function TOpenDialog.GetFiles: TStrings;
begin
Result := FFiles;
end;
...
constructor TOpenDialog.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
FHistoryList := TStringList.Create;
FOptions := [ofHideReadOnly, ofEnableSizing];
FFiles := TStringList.Create;
...