[F$ck, Programming] Delphi
За что я не люблю Delphi и паскалистов?
Да вот за это:

function TXmlElement.Get_XML: TXmlString;
var
	aChildsXML: TXmlString;
	aTag: TXmlString;
begin
	if Assigned(FChilds) and (FChilds.FCount > 0) then
		aChildsXML := FChilds.Get_XML

Английский язык - он посложнее Паскаля будет, да.
Блин, второй раз в жизни портирую дельфийскую программу, и второй раз такое говно.
Тенденция, однако. Код взят из публично доступной библиотеки.