Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Funktion über mehrere Prozeduren (https://www.delphipraxis.net/98734-funktion-ueber-mehrere-prozeduren.html)

kevSTAR 31. Aug 2007 13:32


Funktion über mehrere Prozeduren
 
Hallo Leute!

Wie kann ich eine Funktion schreiben die über mehrere prozeduren geht also beim TWebBrowser z.B document complete und auch downloadcomplete usw. also mehrere prozeduren die zu einer funktion gehören sodass ich z.B nurnoch

Datei := Download('bla.zip');

und er dann alles selber macht und dann das ergebnis zurück gibt?

SirThornberry 31. Aug 2007 13:36

Re: Funktion über mehrere Prozeduren
 
es kann sein das ich dein Problem falsch verstehe aber ich würde sagen so:
Delphi-Quellcode:
function Download(AFileName: String): String;
begin
  result := '';
  if Function1(Params) then
    if Function2(Params) then
      if Function3(Params) then
        result := 'irgendwas';
end;

Wormid 31. Aug 2007 14:16

Re: Funktion über mehrere Prozeduren
 
Ich denke mal er meinte es so, das quasi mit einem Funktionsaufruf per TWebbrowser eine Datei aus dem I-Net runtergeladen werden soll, ohne das er sich um die Events des Objektes & Co. kümmern muss.

Das würde auf dem Wege nur gehen, wenn du dir ein Objekt baust, was das alles für dich tut.

Aber falls das Ziel ist, einfach eine Datei aus dem Netz zu saugen, dann geht das auch ohne den Webbrowser, z.B. so DownloadFile

Gruß

Wormid

kevSTAR 31. Aug 2007 14:33

Re: Funktion über mehrere Prozeduren
 
nein es war nur ein beispiel, wie gesagt ich möchte wissen wie ich eine funktion schreibt die dann wenn nötig auch alleine über die prozeduren wie oncomplete usw. geht und alles auswertet und so

Wormid 31. Aug 2007 14:45

Re: Funktion über mehrere Prozeduren
 
Dann geht das meines Wissens nach nur, indem du (wie in deinem Beispiel) den Webbrowser in einen Objekt kapselst, das die benötigen Aktionen durchführt und auf die dafür notwendigen Events reagiert... und dieses Objekt kannst du dann in einer Funktion benutzen um das gewünschte Ziel zu erreichen.

Delphi-Quellcode:
function Download(const FileURL: string): string;
var
  mdb: TMyDownloadBrowser;
begin
  Result := '';
  mdb := TMyDownloadBrowser.Create;
  try
    if mdb.Download(FileURL) then
      Result := mdb.FileContent;
  finally
    mdb.Free;
  end;
end;
So zum Beispiel... das Objekt "TMyDownloadBrowser" müsste natürlich selbst gebastelt werden, und alles behandeln und tun, was zum download der Datei nötig wäre.

kevSTAR 31. Aug 2007 19:13

Re: Funktion über mehrere Prozeduren
 
hmm versteh ich nicht, kannst du n komplettes beispiel zeigen oder n tutporial oder so?


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:29 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz