Einzelnen Beitrag anzeigen

Benutzerbild von sx2008
sx2008

Registriert seit: 15. Feb 2008
Ort: Baden-Württemberg
2.332 Beiträge
 
Delphi 2007 Professional
 
#7

AW: NULL Werte aus mySQL pro Feld entfernen

  Alt 2. Jun 2011, 18:23
Ich denke deinem Problem kann man mit einer supersimplen Funktion begegnen:
Delphi-Quellcode:
function Coalesce(Value:Variant; default:Variant):Variant;
begin
  if VarIsNull(Value) then
    result := default
  else
    result := Value;
end;
Damit kann du nun so arbeiten:
Delphi-Quellcode:
Exies[i].name1:= Coalesce(_myRow[1], ''); //NAME1
Exies[i].name2:= Coalesce(_myRow[2], ''); //NAME2
Exies[i].Preis:= Coalesce(_myRow[3], 0.0); //VK Preis
Exies[i].Flag:= Coalesce(_myRow[4], False); //boolean Flag
  Mit Zitat antworten Zitat