Srodne teme
Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Jedno pitanje u vezi TGauge komponente?

[es] :: Pascal / Delphi / Kylix :: Jedno pitanje u vezi TGauge komponente?

[ Pregleda: 379 | Odgovora: 2 ]

 Postavi temu Odgovori

Autor
Pretraga teme: Traži
Markiranje Štampanje RSS

inherited
Novi Sad

Član broj: 95516
Poruke: 219
*.dialup.neobee.net.



Profil

icon Jedno pitanje u vezi TGauge komponente?09.06.2006. u 15:13

Na formu sam postavio TTimer, interval je 1000, kako napraviti da se u TGauge prikaze stanje, odnosno tok vremena?
09.06.2006. u 15:13 

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 1465
*.adsl.sezampro.yu.



Profil

icon Re: Jedno pitanje u vezi TGauge komponente?09.06.2006. u 17:35

> Na formu sam postavio TTimer, interval je 1000, kako napraviti da se u TGauge prikaze stanje, odnosno tok vremena?

Code:

procedure TForm1.Timer1Timer(Sender: TObject);
var
  Temp: TColor;
begin
  Gauge1.Progress := Gauge1.Progress + 1;

  if Gauge1.PercentDone = 100 then
  begin
    Gauge1.Progress := Gauge1.MinValue;
    Temp := Gauge1.ForeColor;
    Gauge1.ForeColor := Gauge1.BackColor;
    Gauge1.BackColor := Temp;
  end;
end;
Do not be a help vampire (http://slash7.com/pages/vampires), use the google.

How to ask questions the smart way:
http://www.catb.org/~esr/faqs/smart-questions.html
http://solair.eunet.yu/~fangor...stions/smart-questions.sr.html
09.06.2006. u 17:35 

inherited
Novi Sad

Član broj: 95516
Poruke: 219
*.neobee.net.



Profil

icon Re: Jedno pitanje u vezi TGauge komponente?10.06.2006. u 00:20
Hvala, to mi je za sad dovoljno...
10.06.2006. u 00:20 

[es] :: Pascal / Delphi / Kylix :: Jedno pitanje u vezi TGauge komponente?

[ Pregleda: 379 | Odgovora: 2 ]

 Postavi temu Odgovori

Srodne teme
Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.