Einzelnen Beitrag anzeigen

Benutzerbild von _frank_
_frank_

Registriert seit: 21. Feb 2003
Ort: Plauen / Bamberg
922 Beiträge
 
Delphi 3 Professional
 
#21

Re: Wie kann ich das rechnen

  Alt 19. Aug 2006, 12:14
Delphi-Quellcode:
if rb_4rings.Checked then
begin
  case cb_ring4.ItemIndex of
    0:prozent:=10;
    1:prozent:=5;
    2:prozent:=1;
    3:prozent:=2;
    4:prozent:=0.5;
    5:prozent:=0.25;
    6:prozent:=0.1;
  end;
  pnl_Tolerance.Caption:= format('%.2f',[prozent]);
end;
Zitat von _frank_:
pnl_worstcasemin.caption := floattostr(widerstand-tolerance)+' Ohm';
Gruß Frank
  Mit Zitat antworten Zitat