Hallo,
wo habt ihr denn dann den Preis versteckt ???
Werden die CheckBoxen dynamisch erzeugt ?
Mehr Infos !!!
Eine Möglichkeit wäre Nutzung von
Tag.
Ist ne Integer-Zahl, die jede Komponente hat.
Jede CheckBox/RadioButton bekommt ein Tag.
Anhand des Tag wird der Preis ermittelt:
Delphi-Quellcode:
function GetEuroCentOnTag(theTag: Integer): Integer;
begin
case theTag of
1: Result:= 100; // 1.00 EUR
2: Result:= 150; // 1.50 EUR
else Result:= 0;
end;
Dann benutzt man z.B. Components/ComponentCount,
um alle CB/RB zu durchlaufen und den Preis aufzurechnen
Heiko
PS: Immer in Cent, nie in Euro rechnen (Rundungsfehler)