🚀 go-pugleaf

Witam,

Próbuje przetworzyć XML w Lazarusie

Korzystam z TXMLDocument podobny twór jest w Delphi o ile mnie pamięć 
nie myli i o ile Tworzenie pliku XML/odczyt działa to przy próbie 
modyfikacji trzewa typu zmiana/ usunięcie węzła wywoływało wyjątek 
zerknąłem w kod źródłowy TXMLDocument w metody odpowiednio

Zmiane węzła

procedure TDOMNode.Changing;
begin
   if (nfReadOnly in FFlags) and not (nfDestroying in 
FOwnerDocument.FFlags) then
     raise EDOMError.Create(NO_MODIFICATION_ALLOWED_ERR, 
'Node.CheckReadOnly');
end;


function TDOMNode.ReplaceChild(NewChild, OldChild: TDOMNode): TDOMNode;
begin
   Changing;  // merely to comply with core3/nodereplacechild21
   raise EDOMHierarchyRequest.Create('Node.ReplaceChild');
   Result:=nil;
end;



Odpowiada za usunięcie węzła

function TDOMNode.DetachChild(OldChild: TDOMNode): TDOMNode;
begin
   // OldChild isn't in our child list
   raise EDOMNotFound.Create('Node.RemoveChild');
   Result:=nil;
end;

I teraz pytanie czy w Delphi też są takie kwiatki z XML :) Nie mam jak 
sprawdzić a jestem ciekaw co kryje się pod pierwowzorem tych metod.

Swoją drogą to ciekawa metoda zrobić funkcjonalność niby zgodną i dać 
wyjątek "że tylko w ramach zgodności z czymś tam.... :) 



Pozdrawiam
J-23