Autor Beitrag
DJ-SPM
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 17



BeitragVerfasst: Sa 17.05.03 13:11 
Hey Leute,

ich würde gerne mal wissen, wie ich eine Progressbar programmieren kann, die, nach jeder kopierten Datei, bestimmte Schritte weitergeht.

BSP:

Datei 1 kopiert
PB.Pos:=20
Datei kopiet
PB.Pis:=50
...
...

ich wäre euch für einen kleinen Code sehr sehr dankbar

_____________
DJ-SPM
ErnestoChe
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 528

Win 2000 pro, CRUX 2.0
Delphi 6 Pers, Open K3
BeitragVerfasst: Sa 17.05.03 13:16 
Hi,

du hast es ja fast schon. Nach jeder Kopieranweisung erhöhst du die Position.

Ausserdem hat die Progressbar noch eine StepIt Methode und die eigenschaft step in der du die grösse eines Schrittes festlegst. Da findest du auch genug Beispiele wenn du hier im forum suchst.

MFG

- Ernesto -
DJ-SPM Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 17



BeitragVerfasst: Sa 17.05.03 13:27 
Ja, danke

aber das Problem ist, ich weiss nicht, wie man eine StepIt anweisung schreibt. Verwende ich nach der 2.Kopieroptoin den Code ...Position:=100 stellt er die PB gleich auf 100, ohne, dass die 1. Datei schon kopiet ist... Was mache ich falsch?
ErnestoChe
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 528

Win 2000 pro, CRUX 2.0
Delphi 6 Pers, Open K3
BeitragVerfasst: Sa 17.05.03 13:37 
Hallo nochmal,

also pass auf:

ausblenden Delphi-Quelltext
1:
ProgressBar1.StepIt;					


erhöht die Position um einen Schritt. Den Schritt kannst du unter der Eigenschaft Step im Objektinspektor festlegen.

Weiss du vorher schon wieviel dateien kopiert werden? Wenn z. B. 4 Dateien kopiert werden, machst 100 / 4 = 25. Dann legst du den Step-Wert mit mit 25 fest.

das könnte dann so aussehen:

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
datei1.kopiert;
ProgressBar1.StepIt;
datei2.kopiert;
ProgressBar1.StepIt;
datei3.kopiert;
ProgressBar1.StepIt;
datei4.kopiert;
ProgressBar1.StepIt;


MFG

- Ernesto -
DJ-SPM Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 17



BeitragVerfasst: Sa 17.05.03 13:41 
Danke für deine Hilfe!!!
Es funktioniert jetzt ALLES!
Jetzt, nachdem du es mir gesagt hast, habe ich es auch gelesen (DelphiHilfe)

Trotzden, DANKE für die schnelle Hilfe!!

Ciao
DJ-SPM
ErnestoChe
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 528

Win 2000 pro, CRUX 2.0
Delphi 6 Pers, Open K3
BeitragVerfasst: Sa 17.05.03 13:44 
gern geschehen :wink:

Die Delphi-Hilfe ist zunächst immer ein guter Anlaufpunkt.