AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Delphi Leeren Text "" in MS-SQL Feld NOT NULL Problem

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

Ein Thema von berens · begonnen am 30. Jun 2020 · letzter Beitrag vom 1. Jul 2020
Antwort Antwort
Seite 2 von 2     12
Delphi.Narium

Registriert seit: 27. Nov 2017
2.400 Beiträge
 
Delphi 7 Professional
 
#11

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

  Alt 30. Jun 2020, 15:39
Eventuell:
Delphi-Quellcode:
  t := trim(_Source.FieldByName(MeinText).AsString);
  if t = 'then begin
    _Target.FieldByName(MeinText).AsVariant := EmptyParam; // <-- Das ist die "Variantversion von Null". (Bei Delphi 7 in Variants definiert.)
  end else begin
    _Target.FieldByName(MeinText).AsString := t;
  end;
Beim Lesen von so einer Spalte mit .AsString bekommt man immer einen leeren String.
  Mit Zitat antworten Zitat
berens

Registriert seit: 3. Sep 2004
430 Beiträge
 
Delphi 2010 Professional
 
#12

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

  Alt 30. Jun 2020, 15:55
Typecastfehler :/

Ansonsten aber gute Idee...
Delphi 10.4 32-Bit auf Windows 10 Pro 64-Bit, ehem. Delphi 2010 32-Bit auf Windows 10 Pro 64-Bit
  Mit Zitat antworten Zitat
Jumpy

Registriert seit: 9. Dez 2010
Ort: Mönchengladbach
1.733 Beiträge
 
Delphi 6 Enterprise
 
#13

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

  Alt 30. Jun 2020, 15:59
Als Krücke für die spätere Abfrge geht in MSSQL dann:

WHERE ISNULL(BLA,'')=''
Ralph
  Mit Zitat antworten Zitat
Delphi.Narium

Registriert seit: 27. Nov 2017
2.400 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
berens

Registriert seit: 3. Sep 2004
430 Beiträge
 
Delphi 2010 Professional
 
#15

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

  Alt 30. Jun 2020, 17:22
> _Target.FieldByName(MeinText).Value := EmptyParam
Auch das ergibt einen Laufzeitfehler.

Mein Witz von vorhin scheint sich doch allmählich als realistisch(st)e Lösung hervorzustun.

Delphi-Quellcode:
  t := trim(_Source.FieldByName(MeinText).AsString);
  if trim(t) = 'then begin
    _Target.FieldByName(MeinText).AsString := #0;
  end else begin
    _Target.FieldByName(MeinText).AsString := t;
  end;
Das hätte in meinem Fall den Vorteil, dass das "MeinText" Feld ja nur an wenigen Stellen geschrieben, dafür an vielen Abgefragt wird (evtl. NULL Problematik im SELECT) und ich eben hier nur ein paar wenige "gut auffindbare" Stellen im Quelltext, die angepasst werden müssen.

Meines bescheidenen Wissens nach, sind Strings ja "Nullterminiert", also mit #0 als letztes Byte am Ende. Somit müsste eigentlich für den Fall t='' der Eintrag in der Tabelle stimmen, bzw. Byte-mäßig identisch sein mit den DEFAULT Werten, wenn ich "MeinText" in einem neuen Datensatz gar nicht schreibe(?).

Wenn ich eine Abfrage mache
Code:
SELECT * FROM Layout WHERE MeinText=''
und die Gegenabfrage
Code:
SELECT * FROM Layout WHERE MeinText<>''
werden nun zumindest scheinbar alle Datensätze zurück gegeben - entweder in der einen, oder anderen Abfrage. In sofern KÖNNTE es stimmen...?
Delphi 10.4 32-Bit auf Windows 10 Pro 64-Bit, ehem. Delphi 2010 32-Bit auf Windows 10 Pro 64-Bit

Geändert von berens ( 1. Jul 2020 um 09:05 Uhr)
  Mit Zitat antworten Zitat
hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.269 Beiträge
 
Delphi 10.4 Sydney
 
#16

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

  Alt 1. Jul 2020, 06:42
Hallo,
nimm Queries und PramByName().Clear
Heiko
  Mit Zitat antworten Zitat
TigerLilly

Registriert seit: 24. Mai 2017
Ort: Wien, Österreich
1.172 Beiträge
 
Delphi 11 Alexandria
 
#17

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

  Alt 1. Jul 2020, 09:17
Vielleicht möchtest du auch den Unterschied zwischen VARCHAR und NVARCHAR nachlesen:

https://docs.microsoft.com/de-de/sql...l-server-ver15

https://www.mssqltips.com/sqlservert...ar-data-types/
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.013 Beiträge
 
Delphi 12 Athens
 
#18

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

  Alt 1. Jul 2020, 12:50
Wenn es Probleme gibt, spendiere der MS-SQL-Tabelle 'nen Trigger, der Dir einen Defaultwert in die Spalte schreibt.

Definiere die Spalte als NOT NULL und sorge datenbankseitig bei geliefertem Null, Leerstring, ...
Falls das überhaupt funktioniert.

Wenn die Connection-Komponente im TDataSet/TField das Required auf True setzt, wenn NOT NULL erkannt wurde, dann lässt sich kein Dataset.Post mehr absetzen, so lange das Feld leer ist.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 10:59 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz