Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.336 Beiträge
Delphi XE2 Professional
|
AW: tImage1 geht nur im Form1.OnCreate
24. Jan 2015, 18:59
wobei diese Möglichkeit auch noch besteht, wenn die Procedure eine Methode von Form1 ist:
Delphi-Quellcode:
type
TDeinForm = class(TForm)
private
(* Deklaration einer Methode der Klasse TDeinForm *)
procedure GetBanner;
...
end;
...
(* Implementation der Methode *)
procedure TDeinForm.GetBanner;
var
fAppPath: String;
begin
fAppPath := ExtractFilePath(Application.Exename);
UrlDownloadToFile(nil, Pwidechar('http://myurl.com/banner.png'), Pwidechar(fAppPath + 'banner.png'), 0, nil);
Image1.Picture.LoadFromFile(fAppPath + 'banner.png');
end;
mfg
Helmi
>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<
Geändert von Helmi (24. Jan 2015 um 19:02 Uhr)
|