Einzelnen Beitrag anzeigen

Nicolai1234

Registriert seit: 21. Feb 2004
1.008 Beiträge
 
Turbo Delphi für Win32
 
#7

Re: Möchte div. Formeln aus gefüllten Editfeldern berechnen.

  Alt 25. Sep 2006, 18:55
Zitat von Sunlight7:
Hallo nochmal!

Ich war mal so frei, einen Link zu Deinem Programm zu platzieren: hier
Damit tun sich die Helfer leichter, wenn sie Dein Programm einmal probiert haben.

Zu Deinem Problem: Falls ich Dich auch hier richtig verstanden habe hast Du jetzt das Problem, das Du nicht weißt, ob es 500 mA oder 1.5 A sind?

Falls ja, müstest Du nur vor der Berechnung nachsehen, ob für dieses Beispiel ein m oder M in dem Edit Text steht:
Delphi-Quellcode:
If Pos('M', UpperCase(Edit.Text))>0 then
   { Mit mal 1000 weiterrechnen,} else
   { sonst normal.}
hmm... eher so, oder?
Delphi-Quellcode:
If Pos('M', Edit.Text)>0 then
   { Mit  mal  1000 weiterrechnen} else
If Pos('m', Edit.Text)>0 then
   { Mit durch 1000 weiterrechnen} else
   { sonst normal.}
  Mit Zitat antworten Zitat