CALCUL DE RÉSISTANCE

JulioDelphi Messages postés 2226 Date d'inscription dimanche 5 octobre 2003 Statut Membre Dernière intervention 18 novembre 2010 - 14 nov. 2004 à 23:37
sapak Messages postés 1 Date d'inscription lundi 8 janvier 2007 Statut Membre Dernière intervention 8 janvier 2007 - 8 janv. 2007 à 19:13
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/27569-calcul-de-resistance

sapak Messages postés 1 Date d'inscription lundi 8 janvier 2007 Statut Membre Dernière intervention 8 janvier 2007
8 janv. 2007 à 19:13
MERCI TU ME SAUVE LA VIE!!!!!!!!!!!
c'est exellent ce que tu as fais...
franchement bravo!
WhiteHippo Messages postés 1154 Date d'inscription samedi 14 août 2004 Statut Membre Dernière intervention 5 avril 2012 3
27 mars 2005 à 21:14
Beau travail

2 remarques cependant, histoire de :oP :

- L'ajout des séries normalisées E3, E6, E12, E24,E48 et E96

- Lorsque j'execute ce source chez moi, ça plante au moment où je modifie la tolérance à 0,25%. Cela vient du fait que dans mes options régionales le symbole décimal est un point et non une virgule.

Ce qui serait top, cela serait de s'adapter au "DecimalSeparator", c'est à dire de fixer les tolérances en dynamiques au démarrage du programme et non en statiques (0.25% ou 0,25% selon le cas).

Je sais, un forçage du style DecimalSeparator := ',' en début de programme et hop plus de problèmes, mais moi je préfère le point et j'ai pas envie de reparametrer mes parametres regionaux à chaque utilisation de tel ou tel logiciel :)

Cordialement.
ni69 Messages postés 1418 Date d'inscription samedi 12 juin 2004 Statut Membre Dernière intervention 5 juillet 2010 12
18 mars 2005 à 22:33
merci Delphiprog !
cs_Delphiprog Messages postés 4297 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 9 janvier 2013 32
12 mars 2005 à 08:25
C'est génial. Ce qui montre bien l'utilité de ce petit soft (pas péjoratif du tout).
Je ne résiste pas (lol) au plaisir de te féliciter.

Es brillante. Lo que muestra bien la utilidad de este pequeño suave (no peyorativo muy). No resisto (lol) al placer de felicitarte.
ni69 Messages postés 1418 Date d'inscription samedi 12 juin 2004 Statut Membre Dernière intervention 5 juillet 2010 12
11 mars 2005 à 21:33
je fais de l'export (sans être au courant lol) !
j'ai trouvé ça par hasard :
http://dcrteam.sourceforge.net/index7.html

@+
Nico
ni69 Messages postés 1418 Date d'inscription samedi 12 juin 2004 Statut Membre Dernière intervention 5 juillet 2010 12
4 déc. 2004 à 12:52
Effectivement DelphiProg : je me range à ton avis et je change la police.
désolé de ne pas y avoir plus pensé avant......

Pour la séparation, je suis en train de la faire, et je ne vais pas tarder à mettre à jour ce source ;)
cs_Delphiprog Messages postés 4297 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 9 janvier 2013 32
4 déc. 2004 à 12:00
Très bon travail !
On aurait aimé que les calculs soient dissociés de la présentation pour permettre une réutilisation du code.
La couche métier est ici noyée dans la couche présentation et il n'est pas facile de s'y retrouver pour quelqu'un qui débute.

J'ai une petite question : la police VinerHandItc est-elle libre de doits, peut-on la diffuser aussi simplement ?
ni69 Messages postés 1418 Date d'inscription samedi 12 juin 2004 Statut Membre Dernière intervention 5 juillet 2010 12
19 nov. 2004 à 15:21
Merci :)
cs_grandvizir Messages postés 1106 Date d'inscription samedi 8 novembre 2003 Statut Membre Dernière intervention 3 septembre 2006 22
18 nov. 2004 à 18:38
Cool !! Ce programme... Maintenant c'est très très bien.
ni69 Messages postés 1418 Date d'inscription samedi 12 juin 2004 Statut Membre Dernière intervention 5 juillet 2010 12
16 nov. 2004 à 21:53
Merci :)

Pour les suggestions, je vais voir ce que je peux faire ;)
cs_grandvizir Messages postés 1106 Date d'inscription samedi 8 novembre 2003 Statut Membre Dernière intervention 3 septembre 2006 22
16 nov. 2004 à 19:52
J'apprécie beaucoup. C'est certes moins rapide à manipuler qu'un prog que je m'étais fait, mais celui-ci est plus complet. Un popup panel au lieu des ComboBox serait intéressant. Ce prog est très beau, marche presque dans les deux sens. Il serait bien de rajouter les résultats de la tolérance, car +/- 15% de 4510 ohms ne se fait pas vraiment de tête.
cs_MAURICIO Messages postés 2106 Date d'inscription mardi 10 décembre 2002 Statut Modérateur Dernière intervention 15 décembre 2014 5
15 nov. 2004 à 18:14
Encore un programme atypique.
Merci!
ni69 Messages postés 1418 Date d'inscription samedi 12 juin 2004 Statut Membre Dernière intervention 5 juillet 2010 12
14 nov. 2004 à 23:51
Merci pour tes remarques constructives :)
Je vais modifier ça tout de suite ;)
JulioDelphi Messages postés 2226 Date d'inscription dimanche 5 octobre 2003 Statut Membre Dernière intervention 18 novembre 2010 14
14 nov. 2004 à 23:37
hello,

je suis nul en electricité/electronique et j'ai dejé eu a rechch le code couleur.
Ca va me servir de temps en temps, meme si j'ai une horreur de toucher a l'electricité :p

sinon qqs retouches :
procedure TForm1.ontopClick(Sender: TObject);
begin
OnTop.Checked := not OnTop.Checked;
if OnTop.Checked then Form1.FormStyle := fsStayOnTop
else Form1.FormStyle := fsNormal;
end;

>> pas besoin de "OnTop.Checked := not OnTop.Checked;" puisque si tu mets ton "ontop"(le TMenuItem de ton TPopupMenu) en "AutoCheck=true", elle sera cochée et décochée automatikement.

Idem dans tes 3 procedures : N4Click, N5Click, N6Click :
supprimer "N4Click.checked := true;" idem pour 5 et 5 bien sur, et leur mettre (aux 3 TMenuItem "4" "5" "6")
Je suis sur aussi qu'il y a moyen de tout mettre (ces 3 rpoc.) en une seule proc pour alleger.

et pour finir : nomme tes composants, c'est plus parlant.

9/10 :)
Rejoignez-nous