Forum: Sonstige Fragen zu Delphi
Delphi
by trifid,
7. Dez 2004
na, das sieht nach meinen code aus :-D
vielleicht an deiner Fehler Formel
Fehler = ((Rneu * 100.0) / Rx) - 100.0) in %
und dann ein ListBox1.items.count
entweder du verwendest ein dynamisches Array oder schreibst eine Klasse die die Widerstandslösungen verwaltet, dann bist du flexibel
Forum: Sonstige Fragen zu Delphi
Delphi
by trifid,
3. Dez 2004
procedure TForm1.Button2Click(Sender: TObject);
var R : array of integer;
var Rp : Double;
var Rs : Double;
var Rx : Double;
var E : Double;
var Ep : Double;
var Es : Double;
var c : Char;
begin