Herzlich willkommen in der Delphi-PRAXiS, Gerd.
Du musst die Abfrage einfach auskommentieren - der Code hat wohl eine Säuberungsaktion irrtümlich überlebt:
Delphi-Quellcode:
{
if Assigned(RelatedASObject) then begin
NodeStr := Concat(' -- AS-NodeName: ', RelatedASObject.Name);
end else
}
if Assigned(RelatedNode) then begin
NodeStr := Concat(' -- NodeName: ', RelatedNode.NodeName);
end else NodeStr := '';
Freundliche Grüße vom marabu