HJÆLP!!!!!!!!!!!!!

2:
Brug en timer som sættes til 1000 (1sek) og brug eventen til at ændre på din progressbar:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  if gauge1.value < 90 then
    Gauge1.value := Gauge1.value+10
  else
    gauge1.value := 0;
end;

Her nulstilles værdien bare ved 100% men man kan sætte hvad som helst ind.

1:
under events for button, skal du trykke på onmouseenter (tror jeg nok det hedder) der skriver du
Button.enabled := false;
og i onmouseexit(tror jeg det hedder) skriver du
button.enabled := true;

//krab

Maker Button1 og under Events dobbelt click på MouseOver og skriv :

Button1.Enabled := False;

Maker Form1 og under Events dobbelt click på MouseOver og skriv :

Button1.Enabled := True;

/Michael S