[Jaroslav285]

Здравствуйте. я пытаюсь работать над созданием простого XML-редактора.работаю с классом TXmlDocument,на данный момент программа читает заданый файл,вкидывает в Memo,мне нужно сделать подсветку синтаксиса,и открытие файла из папки,вместо открытия прописаного файла...
программа работает немного кривовато...помогите кто чем может...

Код:

unit Unit2;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, xmldom, XMLIntf, msxmldom, XMLDoc, StdCtrls, ComCtrls, Buttons;

type
  TForm2 = class(TForm)
    Button1: TButton;
    XMLDocument1: TXMLDocument;
    Memo1: TMemo;
    FileOpenDialog1: TFileOpenDialog;
    Button2: TButton;
    BitBtn1: TBitBtn;
    Button3: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
    procedure Button3Click(Sender: TObject);

  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form2: TForm2;

implementation

{$R *.dfm}



procedure TForm2.Button1Click(Sender: TObject);
begin
XMLDocument1.Active := true;
XMLDocument1.FileName:='C:\Users\Admin\Desktop\x\default-capability.xml';
Memo1.Text:=XMLDocument1.xml.Text ;
XMLDocument1.Active := false;
end;



procedure TForm2.Button2Click(Sender: TObject);
begin
Memo1.Lines.SaveToFile('C:\Users\Admin\Desktop\x\def.xml');

end;


 procedure TForm2.Button3Click(Sender: TObject);
begin
XMLDocument1.xml.Text:=BoolToStr(FileOpenDialog1.Execute);
Memo1.Text:=XMLDocument1.xml.Text;
end;

END.

к сообщению добавил архив с проектом программы..работаю в delphi XE...

добавляю текст моего XML:

Код:

<?xml version="1.0" encoding="UTF-8"?>
<devices>
  <version>0.4</version>
  <device>
    <identification>
      <model>G700</model>
      <manufacturer>SonyEricsson</manufacturer>
      <vendor>Sony Ericsson</vendor>
      <brand>Generic</brand>
    </identification>
    <storage>
      <type>MSD</type>
      <max-full>100</max-full>
    </storage>
    <display index="0">
      <height unit="pixels">320</height>
      <width unit="pixels">240</width>
      <colors>262144</colors>
    </display>
    <image>
      <format id="JPEG" preferred="true">
        <maxwidth>2592</maxwidth>
        <maxheight>1944</maxheight>
        <extension>jpg</extension>
        <mime-type>image/jpeg</mime-type>
      </format>
      <format id="BMP" preferred="false">
        <extension>bmp</extension>
        <mime-type>image/bmp</mime-type>
        <mime-type>image/x-bmp</mime-type>
        <mime-type>image/x-ms-bmp</mime-type>
      </format>
      <format id="GIF" preferred="false">
        <extension>gif</extension>
        <mime-type>image/gif</mime-type>
      </format>
      <format id="PNG" preferred="false">
        <extension>png</extension>
        <mime-type>image/png</mime-type>
      </format>
      <format id="MNG" preferred="false">
        <extension>mng</extension>
        <mime-type>image/mng</mime-type>
      </format>
      <format id="SVG" preferred="false">
        <extension>svg</extension>
        <mime-type>image/svg+xml</mime-type>
      </format>
      <format id="ICO" preferred="false">
        <extension>ico</extension>
        <mime-type>image/ico</mime-type>
      </format>
      <format id="TIFF" preferred="false">
        <extension>tif</extension>
        <mime-type>image/tiff</mime-type>
      </format>
      <format id="MBM" preferred="false">
        <extension>mbm</extension>
        <mime-type>image/x-epoc-mbm</mime-type>
      </format>
      <format id="WMF" preferred="false">
        <extension>wmf</extension>
        <extension>apm</extension>
        <extension>clp</extension>
        <mime-type>image/x-wmf</mime-type>
      </format>
      <format id="OTA" preferred="false">
        <extension>ota</extension>
        <extension>otb</extension>
        <mime-type>image/x-ota-bitmap</mime-type>
        <mime-type>image/vnd.nokia.ota-bitmap</mime-type>
      </format>
      <format id="WBMP" preferred="false">
        <extension>wbmp</extension>
        <mime-type>image/vnd.wap.wbmp</mime-type>
      </format>
    </image>
    <audio>
      <format id="Windows Media" preferred="false">
        <extension>wma</extension>
        <extension>asf</extension>
        <mime-type>audio/wma</mime-type>
        <mime-type>audio/x-ms-wma</mime-type>
        <mime-type>audio/x-ms-asf</mime-type>
      </format>
      <format id="MP4" preferred="false">
        <extension>mp4</extension>
        <mime-type>audio/mp4</mime-type>
        <mime-type>audio/mp4-latm</mime-type>
        <mime-type>audio/mpeg4</mime-type>
      </format>
      <format id="m4a" preferred="false">
        <extension>m4a</extension>
        <mime-type>audio/mp4</mime-type>
        <mime-type>audio/mpeg4</mime-type>
      </format>
      <format id="3GPP" preferred="false">
        <extension>3gp</extension>
        <extension>3ga</extension>
        <mime-type>audio/3gpp</mime-type>
      </format>
      <format id="AAC" preferred="false">
        <extension>aac</extension>
        <mime-type>audio/aac</mime-type>
        <mime-type>audio/x-aac</mime-type>
        <mime-type>audio/x-pv-aac</mime-type>
      </format>
      <format id="MP3" preferred="true">
        <extension>mp3</extension>
        <extension>mpg</extension>
        <extension>mpeg</extension>
        <mime-type>audio/mpeg</mime-type>
        <mime-type>audio/x-mpeg</mime-type>
        <mime-type>audio/mp3</mime-type>
        <mime-type>audio/mpeg3</mime-type>
        <mime-type>audio/mpg</mime-type>
        <mime-type>audio/x-mp3</mime-type>
      </format>
      <format id="Real8 audio" preferred="false">
        <extension>ra</extension>
        <mime-type>audio/x-pn-realaudio</mime-type>
        <mime-type>audio/vnd.rn-realaudio</mime-type>
        <mime-type>audio/vnd.m-realaudio</mime-type>
      </format>
      <format id="AMR" preferred="false">
        <extension>amr</extension>
        <mime-type>audio/amr</mime-type>
        <mime-type>audio/x-amr</mime-type>
      </format>
      <format id="RMF" preferred="false">
        <extension>rmf</extension>
        <mime-type>audio/rmf</mime-type>
        <mime-type>audio/x-rmf</mime-type>
        <mime-type>audio/x-beatnik-rmf</mime-type>
      </format>
      <format id="XMF" preferred="false">
        <extension>xmf</extension>
        <mime-type>audio/xmf</mime-type>
        <mime-type>audio/xmf0</mime-type>
        <mime-type>audio/xmf1</mime-type>
        <mime-type>audio/mobile-xmf</mime-type>
      </format>
      <format id="MIDI" preferred="false">
        <extension>mid</extension>
        <extension>midi</extension>
        <extension>imy</extension>
        <mime-type>audio/mid</mime-type>
        <mime-type>audio/midi</mime-type>
        <mime-type>audio/x-mid</mime-type>
        <mime-type>audio/x-midi</mime-type>
        <mime-type>audio/sp-midi</mime-type>
        <mime-type>audio/imelody</mime-type>
        <mime-type>audio/x-imelody</mime-type>
        <mime-type>audio/x-nokia-rng</mime-type>
        <mime-type>audio/vnd.semc.melody</mime-type>
      </format>
      <format id="SMAF" preferred="false">
        <extension>mmf</extension>
        <mime-type>application/vnd.smaf</mime-type>
        <mime-type>application/vnd.x-smaf</mime-type>
        <mime-type>audio/smaf</mime-type>
      </format>
      <format id="AU" preferred="false">
        <extension>au</extension>
        <mime-type>audio/basic</mime-type>
        <mime-type>audio/x-basic</mime-type>
        <mime-type>audio/au</mime-type>
        <mime-type>audio/x-au</mime-type>
     </format>
      <format id="WAV" preferred="false">
        <extension>wav</extension>
        <mime-type>audio/wav</mime-type>
        <mime-type>audio/x-wav</mime-type>
      </format>
    </audio>
    <video>
      <format id="MPEG4" preferred="true">
        <extension>mp4</extension>
        <mime-type>video/mpeg4</mime-type>
        <mime-type>video/mp4</mime-type>
        <mime-type>video/mpeg</mime-type>
        <mime-type>application/mpeg4</mime-type>
        <encoding>mpeg-4</encoding>
        <sound>AAC</sound>
        <kbits>96</kbits>
      </format>
      <format id="ASF" preferred="false">
        <extension>wmv</extension>
        <mime-type>video/wmv</mime-type>
        <mime-type>video/x-ms-wmv</mime-type>
        <mime-type>video/x-ms-asf</mime-type>
      </format>
      <format id="3GPP" preferred="false">
        <extension>3gp</extension>
        <mime-type>video/3gp</mime-type>
        <mime-type>video/3gpp</mime-type>
        <encoding>h264</encoding>
        <part>10</part>
        <profile>0</profile>
        <sound>AAC</sound>
        <kbits>96</kbits>
      </format>
      <format id="Real Video" preferred="false">
        <extension>rm</extension>
        <mime-type>application/x-pn-realmedia</mime-type>
        <mime-type>application/vnd.rn-realmedia</mime-type>
        <mime-type>video/3gpp</mime-type>
      </format>
    </video>
    <filesystem>
      <filename maxlength="256" />
      <folder maxlength="256" />
      <path>
      <camera>\DCIM\</camera>
      <image>\Picture\</image>
      <video>\Video\</video>
      <sound>\Music\</sound>
      <feedsound>\music\podcasts\</feedsound> 
      <feedvideo>\video\podcasts\</feedvideo> 
      <feedimage>\picture\podcasts\</feedimage> 
      <feeds>\other\podcasts\</feeds> 	  
      </path>
    </filesystem>
    <drm>
      <oma-v1>true</oma-v1>
    </drm>
    <store name="Media Store" url="www.sonyericsson.com/mediastore">
      <launchstoreexternally>true</launchstoreexternally> 
    </store>
  </device>
</devices>

Надеюсь на любую вашу помощь...