jackie05 - Do 19.02.09 21:29
Titel: Fragen zu Funktionen?
Hallo,
ich habe folgendes versucht:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
| function GetDownloadURL(URL: string; FileName: string; Hoster: string; FileTyp: string): integer;
begin
FileName := 'FileName';
Hoster := 'Hoster';
FileTyp := 'FileTyp';
result := 1;
end; |
ich möchte, dass FileName, Hoster und FileTyp von der Funktion, ins Label schreiben.
Dazu habe ich mir das so gedacht:
Delphi-Quelltext
1:
2:
3:
4:
| procedure TForm1.Button1Click(Sender: TObject);
begin
GetDownloadURL('http://testseite.de/',Label1.Caption,Label2.Caption,Label3.Caption);
end; |
ich muss das irgendwie so hinbekommen, da ich später die Funktionen in einer DLL Datei auslagere.
Kann mir vieleicht jemand helfen, wie ich das Problem lösen kann?
Ich möchte einfach, dass wenn ich die Funktion aufrufe, das die Daten von der Funktion auch dann ins Label geschrieben werden.
Vielen Dank schonmal.
MfG
jaenicke - Do 19.02.09 21:35
Erstens: Strings bei Funktionen in DLLs ist keine gute Idee. (Geht aber notfalls mit ShareMem wie im vom DLL Assistenten erzeugten Code geschrieben.)
Zweitens: Du kannst die Stringparameter als var deklarieren, dann kannst du deren Werte in der Funktion verändern. Du musst dann aber auch Variablen übergeben und musst deren Werte dann nach dem Aufruf selbst in die Label schreiben.
Delphi-Quelltext
1:
| function GetDownloadURL(const URL: string; var FileName: string; ... |