Leerstring macht NodeValue zum Null

[Boro]

Hallo an alle,

ein Leerstring in eine OLEVariant Variable zuweisen macht kein problem beim ablesen der Variable später.
Aber ein Leerstring zum Knoten zuweisen schon. Es macht ein Null OLEVariant aus dem NodeValue.

Delphi-Quellcode:

var
  TmpS: string;
  Ov: OleVariant;
  DomDoc: IXMLDocument;
  PlatoNode,RootNode: IXMLNode;
begin
  Ov := '';
  TmpS := Ov;   // kein Fehler beim OLEVariant mit ''

  DomDoc := NewXMLDocument();
  RootNode := DomDoc.AddChild('root');
  PlatoNode := RootNode.AddChild('plato');
  PlatoNode.NodeValue := 'abc';
  PlatoNode.NodeValue := '';
  TmpS := PlatoNode.Text;   // kein Fehler hier
  TmpS := PlatoNode.NodeValue; // hier kommt es zum Fehler

Der EVariantTypeCastError 'Could not convert variant of type (Null) into type (String)' taucht auf.
Der XMLData Binding Wizard generiert fur die End Knoten property und getter/setter Funktionen wie zB

Delphi-Quellcode:

  IXMLRootType = interface(IXMLNode)
    ['{E29C33F4-7C7C-4213-B56D-482D7509B675}']
    { Property Accessors }
    function Get_Plato: String;
    procedure Set_Plato(Value: String);
    { Methods & Properties }
    property Plato: String read Get_Plato write Set_Plato;
  end;

{ TXMLRootType }

function TXMLRootType.Get_Plato: String;
begin
  Result := ChildNodes['plato'].NodeValue;
end;

Wie kann man ich die property Root.Plato verwenden wenn auch Leerstring ein mogliches Wert sein kann?
Merkwurdig, das die property Text einen Leerstring zuruck geben kann auch aus dem Knoten mit Null.

[himitsu]

IXMLNode.NodeValue > NodeType = ntElement

Der Textwert, wenn das Element nur Text enthält. Andernfalls führt jeder Lese- oder Schreibzugriff auf NodeValue zu einer Exception.

Vermutlich wird ein leerer String nicht als Text angesehn

[Boro]

Zitat von himitsu:

Vermutlich wird ein leerer String nicht als Text angesehn

Schade.
Dagegen die Property IXMLNode.Text kann ein Leerstring von dem Null Knoten zurückgeben.

Schade, das XML Data Binding Wizard für die String Properties in den Get_ Funktionen nicht die Text Property anstatt der NodeValue verwendet.