Geschlecht in extra Tabelle speichern?

[Mavarik]

Zitat von Dejan Vu:

Zitat von Mavarik:

Da bin ich doch froh, dass ich für sowas immer BitFelder nehme und diese mit einen Const Array im Code verknüpfe...

*Wofür* nimmmst Du Bitfelder und *was* verknüpfst Du mit einem Const Array im Code?

Ein Beispiel könnte sein!:

Delphi-Quellcode:

Var
  Bitfeld : Byte;
begin
  if (BitFeld and $80) = $80 
    then Gender := Sprache[AktSprache,ID_Herr]
    else Gender := Sprache[AktSprache,ID_Frau];

  if (BitFeld and $40) = $40
     then Kunde := true
     else Kunde := false;
end;