Du brauchst eine Variable.
Delphi-Quellcode:
var s: string;
...
s := 'http://www.google.com' + Form1.today[4];
Form1.Icon1.Picture.Assign(load_picture(s));
Alternativ kannst Du das "var" beim Funktionsparameter weglassen, da dieser innerhalb der Funktion sowieso nicht geändert wird.
[edit] Nachtrag: die Funktion sieht sowieso etwas komisch aus. Du weist dem Result das GIF zu und gibst dieses anschließend frei. Das wird fürchterlich knallen. [/edit]