Thema: Delphi Checkbox speichern

Einzelnen Beitrag anzeigen

franke

Registriert seit: 13. Mär 2003
2 Beiträge
 
#1

Checkbox speichern

  Alt 13. Mär 2003, 12:14
Hallo,

auch ich bin Neu und möchte gern meine Checkboxen mit Werten belegen und diese in einer Tabelle speichern und später noch den Mittelwert berechnen.
Wenn die Checkbox angeklickt wurde, soll ein Wert z.B. 1.7 gespeichert werden.Tabelle wird per Laufzeit erstellt
Ich bin mir nicht sicher - ob dies hier die beste Art ist bzw. wie ich den Wert speichern kann, um diesen später mit Mean zu berechnen.
Vielen Dank im Vorraus

Delphi-Quellcode:

var
   asport :array[1..3] of single;

procedure TFormaktiv.Button2Click(Sender: TObject);
var i :string;
begin
   if bowling.Checked then asport[1]:=1.7 else asport[1]:=0.0;
   if billard.Checked then asport[2]:=2.7 else asport[2]:=0.0;
   if surfer.Checked then asport[3]:=3.7 else asport[3]:=0.0;
  begin
  ???AktivModule.sportTable.bowling.post:=asport[1];
     AktivModule.MainTable.billard:=asport[2];
     AktivModule.MainTable.surfer:=asport[3];
end;
[edit=Luckie]Code-Tags gefixet[/edit]
  Mit Zitat antworten Zitat