Moin Leute,
hab wieder mal 'n kleines Problem und hoffe, ihr könnt mir auch diesmal weiterhelfen:
hab in einer radiogroup 3 radiobuttons und will beim betätigen eines buttons je nach markiertem button etwas in meine
db schreiben.
(ist dazu da, manuell zu bestimmen, ob ein tag arbeitstag, frei oder feiertag ist), habs zuerst mal beim ersten radiobutton versucht. allerdings bekomme ich immer ne fehlermeldung beim drücken meines buttons, wenn der erste radiobutton ausgewählt ist (...ParameterArbeitstag hat keinen gültigen Standardwert...)
Code:
procedure TKalenderpflege.Button1Click(Sender: TObject);
var rb :String;
begin
//RadioButton1-----------------------------------
If (RadioButton1.Checked = true) then
begin
rb := 'Arbeitstag';
Label1.Caption := rb; // nur zum Prüfen, was in rb steht
ADODataSetKalender.Active := False;
ADODataSetKalender.CommandText := 'INSERT INTO MA_Kalender(Art) VALUES ('+rb+')';
ADODataSetKalender.Active := True;
end
//RadioButton2-----------------------------------
Else If (RadioButton2.Checked = true) then
begin
rb := 'Feiertag';
Label1.Caption := rb;
end
//RadioButton3-----------------------------------
Else If (RadioButton3.Checked = true) then
begin
rb := 'Arbeitsfrei';
Label1.Caption := rb;
end
//-----------------------------------
end;
wie bekomme ich nun meine variable rb in die datenbank? kann mir da jemand helfen?
mfg jan