Also für eine ProgressBar braucht man eigentlich kein Tutorial.
Den Style kannst du mittels
Smooth leicht beeinflussen und die Farbe der ProgressBar kann man verändern, mit Code aus dem SDC, soweit ich weiß.
Nachtrag: Hier der Code dazu.
Ansonsten einfach
Max,
Position und evtl. auch
Min anschauen.
Im Allgeimeinen ist das Hochzählen wirklich einfach:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var i: integer;
begin
ProgressBar1.Max := 10;
for i := 1 to 10 do
begin
ProgressBar1.Position := i;
Sleep(500);
end;
end;
Der Fortschritt beim programmstart hängt davon ab, was dein Programm macht. Entweder in einer Schleife hochzählen oder nach bestimmten Funktionen/Prozeduren eine Variable um 1 erhöhen und mittels ProgressBar ausgeben lassen.