首  页
站长信箱
868搜索
网站登录
免费计数器
免费留言本
IP来源查询
网站技术教程
网站流量统计
文章探索:   分类:    关键字:  
    什么?你还在找兼职?上兼客吧,现在兼客吧平台太火了,知名度和诚信度也很高,注册就送0.5元现金,满3元就能提现,马上到账了!最低3元就能提现,大家可以注册下试试!注册地址:http://www.jiankeba.com/computeryc1688
  + 栏目导航
  + 相关文章
SQL字符串函数
SQL函数详解
SQL数据库远程备份到本地
SQL数据库备份的基础知识
让SQL飞起来
常用SQL语句词典
精妙SQL语句大全
SQL语句大全
SQL语言快速入门之三
SQL语言快速入门之二
SQL语言快速入门之一
数据库设计入门-SQL语言及其优..
数据库设计入门-SQL语言的分类..
数据库设计入门-ODBC与ADO对象
全面接触SQL语法(二)
全面接触SQL语法(一)
用SQL创建数据库
SQL语言的分类及语法
SQL语言及其优点
SQL语法参考手册
高手是怎样炼成的:精妙SQL语句..
检查数据库表是否存在函数
用DateAdd,DateDiff,between实..
sql函数--DATEDIFF
SQL教程(2)
SQL语言教程(1)

技术教程 -> SQL教程 ->  
SQL教程(2)
来源:转载   人气:6707   录入时间:2006/2/4


    运行期间对数据库表的
   一、数据集表的打开与关闭
   打开:设置数据集组件的Active属性为True或调用数据集组件的Open方法
   关闭:设置数据集组件的Active属性为False或调用数据集组件的Close方法
   
   二、创建数据库应用程序
   利用向导创建:使用Database菜单/Form Wizard选项;
   创建主从表:设置从表的MasterSource、MasterField属性;
   创建查询表:使用TQuery组件;
   
   三、数据库表记录的定位
   使用TDBNavigator组件;
   调用数据集组件的First、Next、Prior、Last方法;
   数据集组件的EOF属性(或BOF属性)用来判断记录指针是否指向第一条记录(或最后一条记录);
   使用数据集的书签BookMark(GetBookMark:获得当前记录的BookMark记号;GotoBookMark:从当前记录直接转到指定BookMark的那条记录;FreeBookMark:释放某个BookMark)
   使用GotoKey、FindKey方法查找记录进行定位;
   
   四、数据库表字段对象的使用
   
   (1)创建永久的字段对象
   双击或单击再右击TTable(TQuery)对象打开字段编辑器,使用其弹出菜单增加字段对象、删除字段对象、定义新的字段对象(字段编辑器的弹出菜单的New Fields选项,可创建计算字段);
   
   (2)字段对象的属性、方法、事件
   字段对象名:如Table1Name、Query1Sid
   属性:Alignment(对齐方式)、Calculated(是否是从其它字段值计算得到)、DisplayLabel(显示的标题)、DisplayWidth(显示的宽度)、DisplayFormat(显示的格式)、EditMask(输入的限制)、FieldName(字段名)、ReadOnly(是否只读)、Visible(是否显示)
   事件:OnChange(字段值发生变化时触发)、OnGetText(当字段对象获得字段值时触发)、OnSetText(当字段对象被设置字段值时触发)、OnValiData(当修改、插入、进行有效性检验时触发)
   
   (3)字段对象的类型转换
   有:AsString 、AsSmallInt 、AsInteger 、AsWord 、AsBoolean 、AsFloat 、AsCurrency 、AsBCD 、AsDate 、AsTime 、AsDateTime转换函数
   如:Edit1.Text:=Table1Name.Value ;
   Table1Bdate.AsString:=DateToStr(DATE) ;
   
   (4)对字段对象的访问
   动态字段对象的访问:Table1.Fields[0]. DisplayLabel:= '学生编号'
   Table1.FieldByName('Sid'). DisplayLabel:= '学生编号' Table1.Fields[0].Assignment:=taCenter
   Edit1.Text:= Table1.FieldByName('Sid').AsString
   永久字段对象的访问:Query1Sid.DisplayLabel:= '学生编号'
   Query1Sid.DisplayWidth:= 12
   
   五、对数据库表数据的操作方法
   
   (1)访问表中某一字段的数据的方法:
   Table1.FieldByName('bookidx').AsString
   Table1.Field[0].AsInteger
   Table1.Fieldvalues['bookidx']
   
   (2)数据库表的一些属性:
   当前记录号:Table1.Recno
   记录总数:Table1.RecordCount
   得到表的字段名:Table1.GetFieldNames(ListBox1。Items)
   
   (3)数据维护的方法:
   Edit方法:把数据集设置为编辑状态;
   Append方法:把数据集设置为插入状态(最后);
   insert方法:把数据集设置为插入状态(当前记录后);
   Post方法:把修改的记录写回数据集;
   Cancel方法:取消当前的操作;
   delete方法:删除表中当前记录;
   AppendRecord方法:
   insertRecord方法:table1.insertRecord(['963409', NIL, NIL,'考试']);
   SetRecords方法:
   Abort方法:取消各种方法的调用;
   
   (4)输入数据的合法性验证
   对数据库表建立合法性验证机制(如在DBD设置表的Validity Check、Table Lookup、Referential Integrity等属性);
    在字段编辑表Fields Editor(双击Ttable对象),选择字段,编写其OnValidate事件,要求非空可设置其Required属性为True;
    在程序中防止不合法输入(如:使用TDBcombobox对象,TDBlookupcombobox对象);
   
   六、数据检索
   (1)利用索引排序
   如:TABLE1.IndexName:='uspa' 或TABLE1.IndexFieldNames:='user_id'
   (2)使用GotoKey方法查找数据库中的记录
    要求查找字段建立了索引,非主索引要设置Ttable对象的IndexName属性。
    调用SetKey方法,把要查找的Ttable对象置成查找模块;
    把查找值送进被查找的Field的查找缓冲区;
    调用Ttable对象的GotoKey方法,测试该方法的返回值判断查找是否成功;
   (3)使用FindKey方法查找数据库中的记录
   把查找值作为参数传递给FindKey函数,允许有多个查找值,要求把要查找的多个字段的索引名赋给Ttable对象的IndexName属性;
   (4)不精确查找
   GotoNearest方法
   FindNearest方法
   (5)使用Locate方法查找数据库中的记录(不用建索引)
   table1.locate('字段名1;字段名2',VarArroyof(['值1','值2']),[LoCaseInsensitive,LoPartialKey])
   LoCaseInsensitive:忽略大小写;IoPartialKey:不精确查找
   (6)设定查找范围的方法
   SetRangeStart、SetRangeEnd、EditRangeStart、EditRangeEnd、SetRange([Start Values],[End Value])、ApplyRange、CancelRange
   (7)用TQuery组件的动态SQL语句进行查找
   
   七、修改数据库中的记录
   在程序中对数据库记录进行操作可按下列的步骤进行:
   (1)移动数据指针到要修改的记录;
   (2)调用Edit方法将Ttable组件设置成编辑状态;
   (3)修改字段值;(Table1.Fieldvalues['字段名']:=值、Table1.Field[0].AsString:=值)
   (4)可用Nil对字段赋空值;
   (5)调用Post方法将修改后的记录写入数据库;
   
   八、插入和删除记录
   删除:移动指针到相应记录处,调用delete方法;
   插入:调用insert、insertRecord方法(当前记录处插入)或Append、insertRecord方法(表的末尾插入);
   
   



| 网站转让 | 站长信箱 | 网站登录 | 技术教程 | 免费计数器 | 免费留言本 | 868流量统计 | 好帮手网站营销 |
地址:广东省阳江市  联系电话:13725641179 杨先生
Copyright 2004-2019 868资源网- 版权所有    粤ICP备05007330号