Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Funktionen und Proceduren aufrufen + frage zu IWprogressbar (https://www.delphipraxis.net/137794-funktionen-und-proceduren-aufrufen-frage-zu-iwprogressbar.html)

SyntaxXx 28. Jul 2009 23:38


Funktionen und Proceduren aufrufen + frage zu IWprogressbar
 
Hi und zwa rbin ich gerade dabei ein programm zus chrien, so jetzt habe ich mir eine procedure geschrieben.

Diese möchte ich jetzt in einer Timer Procedure aufrufen.
So wie ich das mit bekommen habe, brauche ich dafür einfach nur den Namen der Procedure aufrufen.

Also kleines Beispiel:

Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Timer1.Enabled := true;
i := i+1;
Timer1.Enabled := false;
MeineProcedure;
Timer1.Enabled := true;
end;
So in entwa is der Aufbau.
Natürlich ist "MeineProcedure" der name meiner selbst geschriebene Procedure.

Die erste Zeile meiner Procedure sieht so aus:

Delphi-Quellcode:
procedure MeineProcedure(idh : TidHTTP);
Warum geht das jetzt nicht? Also wenn ich das programm starten will makiert er mir im Timer die stelle MeineProcedure;
Wie rufe ich die denn jetzt richtig auf?




Und noch eine frage, wie benuze ich unter Delphi 2009 die IWprogressbar?
ich hab mal wa sgelesen, allerdings da ist die rede von progressbar.Position
Doch .position gibts in delphi 2009 garnicht.

Was ich vor habe ist:
Ich zähle von 600 runter bis 0. Bei 600 soll die Progressbar leer sein und bei 0 ganz am ende.
Wie stelle ich das an?

Luckie 28. Jul 2009 23:56

Re: Funktionen und Proceduren aufrufen + frage zu IWprogress
 
Na ja, du musst schon eine Instanz von TIdHTTP) als Paramter mit übergeben. Aber dir ist schon klar, dass deine Prozedur jedes mal aufgerufen wird, wenn die Timer-Prozedur aufgerufen wird?

Zitat:

Und noch eine frage,
Pro Thread bitte nur eine Frage, sonst geht hier alles durcheinander.


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:22 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