Thema: Delphi Konstanten-Fehler

Einzelnen Beitrag anzeigen

milkilord

Registriert seit: 22. Jan 2010
2 Beiträge
 
Delphi 7 Personal
 
#1

Konstanten-Fehler

  Alt 10. Nov 2010, 14:13
Delphi-Version: 7
Hallo iebe Delphiler,
ich wollte mal fragen, ob jemand weiß, warum bei:
Form1.Icon1.Picture.Assign(load_picture('http://www.google.com' + Form1.today[4])); Den Fehler:
Code:
Konstantenobjekt kann nicht als Var-Parameter weitergegeben werden
Die Funktion:
Delphi-Quellcode:
function load_picture(var url : String) : TGIFImage;
var
  Stream : TMemoryStream;
  GIF : TGIFImage;
begin
  if url <> 'then
    begin
      Stream := TMemoryStream.Create;
      Form1.IdHTTP1.Get(url, Stream);
      Stream.Position := 0;
      GIF := TGIFImage.Create;
      GIF.LoadFromStream(stream);
      Result := GIF;
      GIF.Free;
      Stream.Free;
    end
  else
    begin
      Exit;
    end;
end;
und wie ich den Fehler behebe?
Windows, das erste Betriebsyste mit rekursivem Fehleraufruf!!!
  Mit Zitat antworten Zitat