//--------------------------------------------------------------------------- #ifndef Unit1H #define Unit1H //--------------------------------------------------------------------------- #include <Classes.hpp> #include <Controls.hpp> #include <StdCtrls.hpp> #include <Forms.hpp> #include "SHDocVw_OCX.h" #include <msxmldom.hpp> #include <OleCtrls.hpp> #include <XMLDoc.hpp> #include <xmldom.hpp> #include <XMLIntf.hpp> //--------------------------------------------------------------------------- class TForm1 : public TForm { __published: // IDE-managed Components TButton *btn1; TButton *btn2; TButton *btn3; TXMLDocument *XMLDocument1; TMemo *Memo1; TCppWebBrowser *CppWebBrowser1; void __fastcall FormCreate(TObject *Sender); void __fastcall btn1Click(TObject *Sender); void __fastcall btn2Click(TObject *Sender); void __fastcall btn3Click(TObject *Sender); private: // User declarations public: // User declarations __fastcall TForm1(TComponent* Owner); }; //--------------------------------------------------------------------------- extern PACKAGE TForm1 *Form1; //--------------------------------------------------------------------------- #endif
//--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma link "SHDocVw_OCX" #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::FormCreate(TObject *Sender) { XMLDocument1->LoadFromFile("D:\\code\\B_C_B\\XMLDocument\\test.xml"); } //--------------------------------------------------------------------------- void __fastcall TForm1::btn1Click(TObject *Sender) {//xml输出通过memo显示 Memo1->Lines->Text=FormatXMLData(XMLDocument1->XML->Text); } //--------------------------------------------------------------------------- void __fastcall TForm1::btn2Click(TObject *Sender) {//先保存的修改结果,通过webbrowser会有更好的显示 XMLDocument1->SaveToFile("c:\\temp\\test2.xml"); CppWebBrowser1->Navigate(WideString("c:\\temp\\test2.xml")); } //--------------------------------------------------------------------------- void __fastcall TForm1::btn3Click(TObject *Sender) {//先保存,然后调用外部浏览器显示,需要 uses shellapi XMLDocument1->SaveToFile("c:\\temp\\test2.xml"); ShellExecute(Handle,"open","Exploere","c:\\temp\\test2.xml","",SW_SHOWNORMAL);//此处为何不能显示,我也不得而知、 } //---------------------------------------------------------------------------
原文链接: https://www.cnblogs.com/zhangdongsheng/archive/2011/06/16/2082360.html
欢迎关注
微信关注下方公众号,第一时间获取干货硬货;公众号内回复【pdf】免费获取数百本计算机经典书籍
原创文章受到原创版权保护。转载请注明出处:https://www.ccppcoding.com/archives/27273
非原创文章文中已经注明原地址,如有侵权,联系删除
关注公众号【高性能架构探索】,第一时间获取最新文章
转载文章受原作者版权保护。转载请注明原作者出处!