Delphi Label.Caption mit/durch ProgressBar ändern?!?

Thema durchsuchen

Ansicht

Themen-Optionen

Label.Caption mit/durch ProgressBar ändern?!?

Ein Thema von xShadowBoZz · begonnen am 1. Mai 2008 · letzter Beitrag vom 1. Mai 2008

Vorheriger Beitrag

Nächster Beitrag

Mikender

(Gast)

n/a Beiträge

Re: Label.Caption mit/durch ProgressBar ändern?!?

1. Mai 2008, 19:51

Oder ohne die Variable b würde es auch so gehen

markieren

Delphi-Quellcode:

			procedure TForm1.Timer1Timer(Sender: TObject);

begin

  ProgressBar1.StepBy(1);

  application.ProcessMessages;

  inc(b)

  label3.Caption:= IntToStr(StrToInt(Label3.Caption)+1); 

// Vorsicht das ist ein Pseudo Code (Fehler vorbehalten)  :-D

[Edit] Sorry hat himitsu auch gleichzeitig geschrieben (seltsam kam gar keine Melung über "neuer Beitrag hinzugekommen" [/EDIT]