MSXML - История изменений

Hisava в 08:40, 4 августа 2017

2017-08-04T08:40:51Z

Hisava в 08:28, 11 апреля 2017

2017-04-11T08:28:29Z

Hisava в 12:10, 16 мая 2016

2016-05-16T12:10:20Z

Hisava в 12:09, 16 мая 2016

2016-05-16T12:09:49Z

Hisava в 19:15, 26 апреля 2016

2016-04-26T19:15:39Z

Hisava в 19:14, 26 апреля 2016

2016-04-26T19:14:09Z

Hisava в 19:11, 26 апреля 2016

2016-04-26T19:11:58Z

Hisava: Новая страница: «MSXML - это библиотека Microsoft msxml6.dll При добавлении в проект delphi этой библиотеки Component - Import Co…»

2016-04-26T19:11:29Z

Новая страница: «MSXML - это библиотека Microsoft msxml6.dll При добавлении в проект delphi этой библиотеки Component - Import Co…»

Новая страница

MSXML - это библиотека Microsoft msxml6.dll

При добавлении в проект delphi этой библиотеки

Component - Import Component... - Import a Type Library

у нас появляется файл MSXML2_TLB.pas в котором описан класс CoDOMDocument60

Предположим, у нас есть XML файл

<?xml version="1.0" encoding="utf-8"?>
<config>
<size>
<height>500px</height>
<width>100px</width>
</size>
</config>

← Предыдущая		Версия 08:28, 11 апреля 2017
Строка 69:		Строка 69:

	100px		100px
		+	= Смотрите также =
		+	[[Информация для разработчиков системы фабиус]]

← Предыдущая		Версия 12:10, 16 мая 2016
Строка 6:		Строка 6:

	[[Файл:16-05-2016 15-09-55.png]]		[[Файл:16-05-2016 15-09-55.png]]
		+

	у нас появляется файл MSXML2_TLB.pas в котором описан класс CoDOMDocument60		у нас появляется файл MSXML2_TLB.pas в котором описан класс CoDOMDocument60

← Предыдущая		Версия 12:09, 16 мая 2016
Строка 4:		Строка 4:

	Component - Import Component... - Import a Type Library		Component - Import Component... - Import a Type Library
		+
		+	[[Файл:16-05-2016 15-09-55.png]]

	у нас появляется файл MSXML2_TLB.pas в котором описан класс CoDOMDocument60		у нас появляется файл MSXML2_TLB.pas в котором описан класс CoDOMDocument60

← Предыдущая		Версия 19:15, 26 апреля 2016
Строка 62:		Строка 62:

	end.		end.
		+
		+	При нажатии на кнопку Button1 программа нам выдаст результат
		+
		+	100px

← Предыдущая		Версия 19:14, 26 апреля 2016
Строка 16:		Строка 16:
	</size>		</size>
	</config>		</config>
		+
		+	который имеет странное имя PurchaseOrder.xml
		+
		+	Для чтения этого файла будем использовать следующую программу ( delphi 10 seattle )
		+
		+	unit Unit1;
		+
		+	interface
		+
		+	uses
		+	Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
		+	Vcl.Controls, Vcl.Forms, Vcl.Dialogs, MSXML2_TLB, Vcl.StdCtrls;
		+
		+	type
		+	TForm1 = class(TForm)
		+	Button1: TButton;
		+	procedure Button1Click(Sender: TObject);
		+	private
		+	{ Private declarations }
		+	public
		+	{ Public declarations }
		+	end;
		+
		+	var
		+	Form1: TForm1;
		+
		+	implementation
		+
		+	{$R *.dfm}
		+
		+	procedure TForm1.Button1Click(Sender: TObject);
		+	var
		+	XMLDoc : DOMDocument60;
		+	Root : IXMLDOMElement;
		+	begin
		+	XMLDoc := CoDOMDocument60.Create;
		+	XMLDoc.load( 'PurchaseOrder.xml' );
		+	Root := XMLDoc.documentElement;
		+
		+	ShowMessage( Root.selectSingleNode( 'size/width' ).text);
		+
		+	Root := nil;
		+	XMLDoc := nil;
		+	end;
		+
		+	end.

@@ Строка 2: / Строка 2: @@
 При добавлении в проект delphi этой библиотеки
   Component - Import Component... - Import a Type Library
 [[Файл:16-05-2016 15-09-55.png]]

@@ Строка 11: / Строка 11: @@
   <?xml version="1.0" encoding="utf-8"?>
   <config>
-	<size>
+   <size>
-		<height>500px</height>
+     <height>500px</height>
-		<width>100px</width>
+     <width>100px</width>
-	</size>
+   </size>
   </config>