TJvDigits von JVCL

[ManuMF]

Das geht sowieso nicht so ganz:
Die Uhrzeit hat das Format xx:xx:xx (als String), und die JvDigits wollen eine Kommazahl (xx,xx).
Ich glaube, bei "15,75 Uhr" weiß nicht gleich jeder, dass es viertel vor vier ist... ;-)

Probiers mal mit JvSegmentedLEDDisplay (JvHMI).

Gruß,
ManuMF

[Vader]

hallo ManuMF,

kannst du mir nicht einen code posten mit "JvSegmentedLEDDisplay", wie man da
eine uhrzeit realisieren könnte, das fehlt mir noch bei meinem programm als optisches highligt !!

mfg vader

[Vader]

hallo,

noch eine frage: hab die jedis installiert, gibt's es eine deutsche hilfe zu den komponenten ?
mfg vader

[ManuMF]

Deutsche Hilfe gibt es glaube ich nicht...

aber es ist recht einfach:
Erstelle dir 8 Digits (Rechtklick im OI -> Add Digit). Beim 3. und 6. stellst du UseColon auf scuColonOnly. Das heißt, die Digits sind nur ein Doppelpunkt.
Dann, z. B. per Timer: JvSegmentedLEDDisplay.Text := TimeToStr(Time) oder wie auch immer. Nur solltest du darauf achten, dass der String, den du übergibst, immer zu den Doppelpunkten in den Digits passt. ODER: Du stellst alle Digits auf scuFull, dann kann theoretisch nichts passieren.

Gruß,
ManuMF

[Vader]

hallo ManuMF,

du schreibst 8 digts, sind das 8 JvSegmentedLEDDisplay ?
weil ich finde die eigenschaften "UseColon und scuFull" nicht ?

mfg vader

[ManuMF]

Hallo,

Zitat:

Zitat von ManuMF

Erstelle dir 8 Digits (Rechtklick im OI -> Add Digit).

Rechtsklick auf JvS.L.Display. Die Eigenschaften haben dann die einzelnen Digits.

Gruß,
ManuMF

[Vader]

hallo,

danke das mit den eigenschaften habe ich geschnallt, aber wie soll ich die zeit
auf die 8 digts verteilen, so geht nicht

Delphi-Quellcode:

JvSegmentedLEDDisplay1.Text := TimeToStr(Time)
JvSegmentedLEDDisplay2.Text := TimeToStr(Time)
JvSegmentedLEDDisplay3.Text := TimeToStr(Time)
...usw ???

mfg vader

[Vader]

hallo,
hat irgend wer eine idee wie man das lösen könnte ?
mfg vader

[ManuMF]

Zitat:

Zitat von ManuMF

per Timer:

Delphi-Quellcode:

JvSegmentedLEDDisplay.Text := TimeToStr(Time);

Das würde, wenn der Timer das Intervall 1000 oder kleiner (wobei das so reichen sollte) hat, die aktuelle Zeit anzeigen.

Gruß,
ManuMF

[Vader]

hallo,ManuMF

ich steh glaube ich auf der leitung, muß ich jetzt 8 JvSegmentedLEDDisplay auf die form setzten ?
weil ich habe 8 JvSegmentedLEDDisplay kompo auf der form und wenn ich deinen code in den timer
schreibe kommt diese fehlermeldung

Delphi-Quellcode:

[Fehler] Unit1.pas(36): E2003 Undefinierter Bezeichner: 'Text'

mfg vader