Description: simple database program, for example. Originality. Use some small skills. It is not the most simple to use controls. Such as : function GetDsXml (sql : string) : string begin with FrmDb do begin qry.Close qry.SQL.Clear qry.SQL.Add (sql ) try qry.Open cds1.Open if not qry.Eof then begin Result : = cds1.XMLData end except on e : Exception do Result : = qry.Close cds1.Close e.Message end end end
File list (Check if you may need any files):