Finde meinen Fehler nicht!!!

[Andreas L.]

Zitat von buyden:

Delphi-Quellcode:

procedure TForm6.Panel6Click(Sender: TObject);
begin
datamodule2.Table2.edit;
datamodule2.Table3.edit;
if dbcheckbox1.checked=false then  <-- Hier muss ein : hin, also: dbcheckbox1.checked :=FALSE;
begin
dbedit4.Text:=floattostr(strtofloat(dbedit4.Text)+strtofloat(dbedit2.Text));
dbcheckbox1.Checked:=true;
datamodule2.Table2.Post;
datamodule2.Table3.Post;
end;

end;