Discussion :

[fredtheman]

Bonjour

Je débute à peine en Delphi mais je maitrise bien VB, et j'aimerais écrire une petite appli qui afficherait une horloge numérique. Quelqu'un pourrait-il me recommander un composant (à supposer que c'est bien en intégrant un VCL dans une projet puis une form que l'on construit ce genre de chose en Delphi)?

Merci
Fred.

[sjrd]

Je pense que tu devrais d'abord faire un tour dans les cours. Il y a plein de trucs utiles pour apprendre.
Ensuite une horloge numérique c'est un exemple classique des livres (dans presque tous ceux que j'ai lus, pour à peu près tous les langages, on en propose une).
Donc tu vois un peu de doc ne fait jamais de mal.

[Sub0]

Salut!

J'avais déjà eu l'occasion de réaliser ce genre d'appli... Je l'ai remis un peu à jour.

http://sub0.developpez.com/delphi/lcd.zip

Libre à toi de l'utiliser ou non. A mon avis, tu pourras probablement faire mieux...
Par exemple, au lieu d'utiliser des bitmaps, utiliser une police LCD.
Je possède justement un petit soft permettant de réaliser ses propres polices...
Surtout, si tu as des questions, n'hésite pas! à+

[Sub0]

Les avantages d'utiliser une police true type sont la rapidité et la qualité d'affichage, mais aussi la possibilité de choisir facilement la taille et la couleur des caractères, etc. Je l'ai développé car je vais en avoir besoin très prochainement pour afficher le temps des joueurs de mon jeu d'Echecs... Dommage que je ne sois pas arrivé à intégrer le fichier de la police dans l'éxé!

http://sub0.developpez.com/delphi/lcd2.zip

à+

[sjrd]

Au passage, comment crées-tu une police ?

[Sub0]

Au passage, comment crées-tu une police ?

http://www.dafont.com/soft.php

[Sub0]

Etes-vous arrivés à faire fonctionner la démo avec la police LCD?
Perso, ça marchait tout à l'heure, je redémarre win et ça ne fonctionne plus...
Impossible de trouver d'où ça vient! ...comme-ci il ne trouvait plus la police.
Pourtant, le code me paraît être correcte et le fichier est bien assigné...
J'ai l'impression que mon fichier de police n'est pas valide... et pourtant...

[Sub0]

Voilà, c'est réglé.
Le problème venait de plusieurs choses, une taille de police trop grande et un nom d'accès invalide.
Je suppose que l'intégration du fichier ttf dans l'éxé va fonctionner à présent.
En attendant, vous devez extraire l'appli et la police sur votre disque dur pour voir le résultat.

http://sub0.developpez.com/delphi/lcd2.zip

à+

[sjrd]

Au passage, comment crées-tu une police ?

http://www.dafont.com/soft.php

Dommage qu'ils soient tous Shareware...

[fredtheman]

Voilà, c'est réglé.

Merci, très sympa :-) Je vais regarder comment générer ajouter une réglette pour choisir le délai d'expiration. Tout ça pour faire la cuisine ;-)

Thx
Fred.

[Sub0]

Merci, très sympa :-)

De rien, de toutes façons, je l'ai dis, je vais en avoir besoin pour mon jeu d'Echecs...

Je vais regarder comment générer ajouter une réglette pour choisir le délai d'expiration. Tout ça pour faire la cuisine ;-)

Je ne comprend pas trop ton objectif, mais tanpis. L'essentiel est que tu vois un peu les immences possibilités de Delphi...
N'oublie pas d'ajouter le tag [résolu] lorsque tu estimeras que le sujet est terminé.
Bon dev, à+

[fredtheman]

Je ne comprend pas trop ton objectif, mais tanpis

Ben juste faire un compteur de cuisine. Ca me permet de retourner lire sur le PC sans avoir à garder une oeil sur l'heure pendant que ça cuit... et une occasion comme une autre de me faire la main sur Delphi :-)

Par contre, je vois que tu mets ton pseudo lors du chargement de la font. Je pourrais pas retirer ça et mettre ton nom en copyright dans le source à la place?

Fred.

[Sub0]

Je pourrais pas retirer ça et mettre ton nom en copyright dans le source à la place?

Bien sûr que si! Tu peux faire comme bon te semble, cela ne me gêne absolument pas...

...lors du chargement de la font

Pas tout à fait. Juste que les captions des labels ont "Sub0" par défaut. Il suffira de les remplacer par "88:88:88" par exemple et de supprimer les lignes "Application.ProcessMessages" et "Sleep()" dans la procédure de création "OnActivate".

à+

[fredtheman]

Pas tout à fait. Juste que les captions des labels ont "Sub0" par défaut. Il suffira de les remplacer par "88:88:88" par exemple et de supprimer les lignes "Application.ProcessMessages" et "Sleep()" dans la procédure de création "OnActivate".

Super c'est bon :-)

Merci bp
Fred.