Thema: Delphi Problem mit DBCheckBox

Einzelnen Beitrag anzeigen

Benutzerbild von joachimd
joachimd

Registriert seit: 17. Feb 2005
Ort: Weitingen
679 Beiträge
 
Delphi 12 Athens
 
#2

Re: Problem mit DBCheckBox

  Alt 13. Mai 2005, 11:53
Zitat von spoona:
Bei Anlage eines neuen Datensatzes steht in der DB noch kein Wert drin--klar(Ohne Defaultwert). Jetzt sind alle Checkboxen leider grau und mit einem Haeckchen versehen.Das will ich aber nicht!!!!
Warum nicht? Das ist genau der Zustand in Deiner DB. Du solltest vielleicht TQuery/TTable.AAfterInsert entsprechend behandeln und dort die Felder vorbelegen (die DB-Controls nehmen dann automatisch den richtigen Zustand an):

Delphi-Quellcode:
procedure TForm1.AdsTable1AfterInsert(DataSet: TDataSet);
var
  i:integer;
begin
  for i:=0 to Dataset.FieldCount-1 do
    if Dataset.Fields[i].IsNull
      then begin
        //Beispiel
        if (DataSet.Fields[i].DataType is ftBoolean)
          then Dataset.Fields[i].AsBoolean:=False;
      end;
end;
Joachim Dürr
Joachim Dürr Softwareengineering
http://www.jd-engineering.de
  Mit Zitat antworten Zitat