CALCUL DE RÉSISTANCE

Commentaire de JulioDelphi le 14/11/2004 23:37:08 administrateur CS

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 :)

Commentaire de MAURICIO le 15/11/2004 18:14:58

Encore un programme atypique.
Merci!

Commentaire de ni69 le 16/11/2004 21:53:52

Merci :)

Pour les suggestions, je vais voir ce que je peux faire ;)

Commentaire de ni69 le 19/11/2004 15:21:53

Merci :)

Commentaire de ni69 le 04/12/2004 12:52:49

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 ;)

Commentaire de Delphiprog le 12/03/2005 08:25:46 administrateur CS

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.

Commentaire de WhiteHippo le 27/03/2005 21:14: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.