TJvDigits von JVCL

[Vader]

hallo,

möchte gerne was mit der komponente TJvDigits von JVCL programmieren, wie kann man da zb. ein zahl nach oben zählen lassen ?

mfg vader

[s.h.a.r.k]

Hey.

Das ganz musst du so machen:

Delphi-Quellcode:

procedure TForm1.IncrementDigitCounter;
var
  i : Double;
begin
  i := JvgDigits1.Value;
  i := i + 1;
  JvgDigits1.Value := i;
end;

mfg shark

[Vader]

hallo,

danke werd's probieren !
mfg vader

[jbg]

Wofür die Hilfsvariable i ?

Delphi-Quellcode:

procedure TForm1.IncrementDigitCounter;
begin
  JvgDigits1.Value := JvgDigits1.Value + 1;
end;

[fkerber]

Hi!

Oder so:

Delphi-Quellcode:

procedure TForm1.IncrementDigitCounter; 
begin 
  inc(JvgDigits1.Value)
end;

Ciao Frederic

[Khabarakh]

Zitat von fkerber:

Hi!

Oder so:

Delphi-Quellcode:

procedure TForm1.IncrementDigitCounter; 
begin 
  inc(JvgDigits1.Value)
end;

Ciao Frederic

Würde mich wundern, wenn Value keine Property ist .
*diekomponentesuch*

[fkerber]

HI!

Kenne die Kompo nicht, aber du hast Recht, es sieht danach aus, als wärs ne Value, dann haut das nicht hin...


Ciao Frederic

[ManuMF]

Habs überprüft:

Inc funktioniert nicht,
Dig.Value := Dig.Value + 1 funktioniert.

Gruß,
ManuMF

[Vader]

hallo,

ich möchte jetzt die uhrzeit anzeigen lassen,
habs so probiert aber ohne erfolg !

JvgDigits2.Value:=timetostr(time); mfg vader

[fkerber]

Hi!

Erwartet Value nicht nen Integer? Und du weißt ihm einen String zu?
Du musst die Uhrzeit wohl vorher zerlegen...

Ciao Frederic