Einzelnen Beitrag anzeigen

Delphi.Narium

Registriert seit: 27. Nov 2017
2.490 Beiträge
 
Delphi 7 Professional
 
#14

AW: Leeren Text "" in MS-SQL Feld NOT NULL Problem

  Alt 30. Jun 2020, 16:26
Einen noch:
Delphi-Quellcode:
t := trim(_Source.FieldByName(MeinText).AsString);
if t = 'then begin
  _Target.FieldByName(MeinText).Value := EmptyParam; // <-- Das ist die "Variantversion von Null". (Bei Delphi 7 in Variants definiert.)
end else begin
  _Target.FieldByName(MeinText).AsString := t;
end;
  Mit Zitat antworten Zitat