Feldwert in DBGrid prüfen

[FrankBrin]

Hallo zusammen,
habe ein ganz profanes Problemchen.
Habe eine kleine AdressenDB in MSAccess. Zeige nun über TADOQuery, DataSource und einem DBGrid die Daten an. In der letzten Spalte steht das Geschlecht (m/f). Diese Spalte prüfe ich beim ColExit auf Inhalt = f oder m.
Nun ist es so, daß immer wieder der Wert '' zurückgegeben wird.

Meine Frage: Warum?

Habe hier ein bischen Codefragmente:

Delphi-Quellcode:

procedure TFrmAddrList.DGdAddrListColExit(Sender: TObject);
var myDate    : TDate;
    myStr     : String;
begin
  if (DSrcAddrList.State = dsEdit) or (DSrcAddrList.State = dsInsert) then begin
    //Geschlecht prüfen
    if (DGdAddrList.SelectedIndex = 6) then begin
      myStr := LowerCase( DSrcAddrList.DataSet.FieldByName( 'Gender').AsString);
      if (myStr = 'f') or (myStr = 'm') then begin
        DSrcAddrList.DataSet.FieldByName( 'Gender').AsString := MyStr;
      end else begin
        Application.MessageBox( 'Ein Mensch kann nur (m)ann oder (f)rau sein. Bitte korrigieren!', 'He Du', MB_OK);
      end;
    end;
  end;
end;

Gruß
Frank

[edit=mkinzler]Delphi-Tag eingefügt Mfg, mkinzler[/edit]