UPDATE tabelle4711 SET Ansprechpartner=NULL WHERE Ansprechpartner=''
Obige
SQL-Anweisung setzt das Feld
Ansprechpartner auf NULL, wenn es einen
leeren String enthält.
Man kann immer nur ein Feld auf diese Art updaten.
Du kannst aber auch schon beim Editieren dafür sorgen, dass leere Felder als NULL-Werte gespeichert werden.
Im Event
BeforePost rufst du einfach folgende Procedure auf:
Delphi-Quellcode:
procedure ClearEmptyStringFields(fields:TFields);
var
i : Integer;
f : TField;
begin
for i:=0 to fields.Count-1 do
begin
f := fields[i];
if (f.DataType in [ftString, ftWideString]) and (f.Required=False) and (f.AsString='') then
f.Clear; // Set Field to NULL
end;
end;
procedure ......BeforePost(dataset:TDataset);
begin
ClearEmptyStringFields(dataset.fields);
end;