Скачать: CL | DM;

XML   Найти похожие ветки 

← →
Dennis I. Komarov ©   (2010-09-01 11:01) [0]

Не то, что бы вопрос...
Была ветка в которой очередные дебаты по поводу работы с xml форматом. Если память не изменяет, у Медвежонка П. был код аля "оболочка над IXMLDOMDocument". Вот хотел поглядеть, а ветку найти не могу :(

---

← →
Palladin ©   (2010-09-01 11:03) [1]

Медвежонок П. - это Пять! )

---

← →
Игорь Шевченко ©   (2010-09-01 11:04) [2]

а что, http://www.delphimaster.net/ не работает ?

---

← →
Dennis I. Komarov ©   (2010-09-01 11:16) [3]

> Игорь Шевченко ©   (01.09.10 11:04) [2]

Работает, но там чегой-то все очень старое, а ветка не так давно была...

> Palladin ©   (01.09.10 11:03) [1]

Это почему?

---

← →
Думкин ©   (2010-09-01 11:21) [4]

> Это почему?

политическое. Явный намек.

---

← →
Медвежонок Пятачок ©   (2010-09-01 11:39) [5]

"обертка" представляет собой малюсенький юнит

//базовая функция чтения
function BearPigglet_GetXPathValue(iNode : IXMLDOMNode; const AXPath : string) : OleVariant;
var vNode : IXMLDOMNode;
begin
Result := Unassigned;
vNode := iNode.selectSingleNode(AXPath);
if vNode <> nil then
 case vNode.nodeType of
  NODE_ATTRIBUTE : Result := vNode.nodeValue;
  else Result := vNode.text;
 end;
end;

производные от нее типизированные функции:
function BearPigglet_GetXPathValueStr(iNode : IXMLDOMNode; const AXPath : string) : string;
begin
Result := VarToStr(BearPigglet_GetXPathValue(iNode,AXPath));
end;

function BearPigglet_GetXPathValueDbl(iNode : IXMLDOMNode; const AXPath : string) : Double;
begin
Result := TryToDouble(BearPigglet_GetXPathValueStr(iNode,AXPath));
end;

где TryToDouble - вспомогательный код, который удаляет из строки все что помешает сделать StrToFloat , определяющая, какой из разделителей в строке является разделителем разрядов и меняющая его на децимал сепаратор

по такому же принципу были функции для даты-времени.
ну и похожие методы на запись данных в узлы/атрибуты по xpath пути

---

← →
Palladin ©   (2010-09-01 11:52) [6]

> политическое. Явный намек.

не угадал, но тоже не плохо

---

← →
Поросенок Винни-Пух ©   (2010-09-01 11:59) [7]

кто тут крошит батон на медвежонка?

---

← →
xayam ©   (2010-09-02 02:59) [8]

> но там чегой-то все очень старое, а ветка не так давно была

обновлю скоро, с этим огромным файлом на 3.5Mb  только бы пронесло по времени :)

---

← →
Eraser ©   (2010-09-02 03:02) [9]

> BearPigglet_GetXPathValue

;-)))

---

← →
Германн ©   (2010-09-02 03:39) [10]

> Поросенок Винни-Пух ©   (01.09.10 11:59) [7]
>
> кто тут крошит батон на медвежонка?
>

:)

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.004 c