摘要： IF EXISTS(SELECT * FROM sys.Tables WHERE name='stu_info') DROP TABLE stu_infoGoCreate table stu_info(stu_id int identity(1,1),name nvarchar(20)not null,birthday date null, sex nvarchar(2)null,addres nvarchar(20)null, mark int null,major nvarchar(20)null, sdept nvarchar(20)null ); Insert Into 阅读全文

摘要： 首先用到TXMLDocument控件；Memo来显示XML文件，TreeView来呈现元素；源代码：Procedure TForm2.Button1Click(Sender: TObject);Begin XMLDocument1.LoadFromFile('E:\template1.xml'); Memo1.Font.Size :=15; Memo1.Align := TAlignLayout.alLeft; Memo1.Lines := XMLDocument1.XML; {查看}End;Procedure TForm2.Button2Click(Sender: TObje 阅读全文