Guten Morgen Zusammen,
Delphi-Quellcode:
procedure TForm_OverView.WebFilePicker1Change(Sender: TObject);
var
fo: TJSHTMLFile;
s:
string;
begin
fo := WebFilePicker1.Files.Items[0].FileObject;
//hier wird eine Datei mit einer Art OpenDialog ausgewählt.
asm
s =
URL.createObjectURL(fo);
end;
WB_O1.URL := s;
end;
Den OpenDialog möchte ich gerne weg haben und fo eine Datei durch meinen Programm-Code zuweisen. TJSHTMLFile scheint mir eine abgeleitete Klasse von TFile zu sein.
Daher meine Frage: Wie kann ich einer Variable vom Typ TFile eine Datei zuweisen. Leider scheint create(Pfad: string, Variabe: TJSHTMLFile) nicht zu funktionieren.
Vielen Dank
Patrick