Datein kopieren, mit Statusbar und Buttons

[Lord Butterbrot]

Hi, ich arbeite grad an einem Projekt, wo ich einen einfachen Installer erstelle (allerdings nur für ein bestimmtes Programm).
Passwortabfrage, Verzeichnisauswahl, Ordnererstellung und Dateikopierung sind bereits schon eingebaut.

Meine 2 Fragen jetzt:
1) Ich will eine Statusbar einbauen (oder eine Gauge Komponente). Wie kann ich erreischen, das sie 100% anzeigt wenn die datein fertig kopiert sind?
Also 0% wenns anfängt und dann stetig steigend bis zu 100% (alle datein sind kopiert)?
2) Wenn die Datein fertig kopiert sind, will ich einen button habe, der Erscheint (durch Visible versteckt). Wie kann ich dies erreischen das er bei Beendung erscheit?

Markus

[stahli]

Hi Markus,

das müsste eigntlich alles in der Hilfe stehen...

Delphi-Quellcode:

Button.Visible := False;
ProgressBar.Min := 0;
ProgressBar.Max := AnzahlDateien;
ProgressBar.Position := 0;
ProgressBar.Step := 1;
for I := 1 to AnzahlDateien do 
begin
  DateiKopieren;
  ProgressBar.StepIt;
end;
Button.Visible := True;

Das müsste eigentlich passen.

Stahli

[Lord Butterbrot]

Danke!

Markus

[rollstuhlfahrer]

HI,

mit CopyFileEx kannst du auch erreichen, dass du den aktuellen Fortschritt der Datei erfährst. Um daraus den Gesamtfortschritt zu errechnen musst du den aktuellen Fortschritt durch die Anzahl der Dateien teilen und den Fortschritt der abgeschlossenen Dateien (100%) dazurechnen. Heißt, dass wenn du Datei 4 von 10 kopierst mit einem Momentanfortschritt von 60% hast du einen Gesamtfortschritt von ((4-1)/10 * 100) [fertige Dateien] + (60/10) [Teilfortschritt].

Bernhard