Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.624 Beiträge
Delphi 12 Athens
|
Re: Combobox
4. Apr 2010, 13:30
Die schnellste (im Sinne von Ergebnis erzielen) Möglichkeit wäre IMO
Delphi-Quellcode:
var x :integer;
begin
x:=0;
x:= x + StrToIntDef(combobox1.text,0);
x:= x + StrToIntDef(combobox2.text,0);
x:= x + StrToIntDef(combobox3.text,0);
edit1.text:= IntToStr(x);
Detlef "Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|