Thema: Delphi TJvDigits von JVCL

Einzelnen Beitrag anzeigen

Benutzerbild von ManuMF
ManuMF

Registriert seit: 11. Jul 2005
1.016 Beiträge
 
Delphi 6 Personal
 
#21

Re: TJvDigits von JVCL

  Alt 16. Nov 2005, 18:03
Zitat von ManuMF:
Erstelle dir 8 Digits (Rechtklick im OI auf JvS.L.Display -> Add Digit).
Ich habs doch schon geschrieben

Erstelle ein JvSegmentedLEDDisplay. Im OI klicke rechts drauf und dann auf "Add Digit" (siehe Anhang 1).
Für das Digit wähle UseColon = scFull aus (siehe Anhang 2). Das ganze dann 8 mal.

Jetzt kannst du einen Timer verwenden:
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
  JvSegmentedLEDDisplay1.Text := TimeToStr(Time);
end;
Das war's

Gruß,
ManuMF
Miniaturansicht angehängter Grafiken
sc1_550.jpg   sc2_725.jpg  
Gruß,
ManuMF

Endlich hab ich was Positives an Vista entdeckt: Das mitgelieferte Mahjongg
  Mit Zitat antworten Zitat