Ja und? Deine Variable
datei ist aber vom Typ
TFileStream!!!
AssignFile erwartet aber als zweiten Paramter eine Zeichenkette in der der Pfad und der Name der Datei steht, die der Dateivariablen
F zu gewiesen werden soll. Den Cast nach PChar mag der Kompiler zwar akzeptiren, aber funktionieren wird es nicht.
Desweitern könnte es Probleme geben, weil der FileStream die datei noch nicht geschlossen hast und du sie mit AssignFile und reset öffnen willst.
Da es sich ja eh um eine Textdatei handelt, warum nicht so:
Delphi-Quellcode:
var
sl: TStringlist;
begin
sl := TStringList.Create;
try
sl.Text := IDHTTP.Get('...');
Label1.Caption := sl.Strings[0];
finally
FreeAndNil(sl);
end;