说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

请大家看看,代码有错吗?无错位何edit2.text中开不到查找的数据!

编辑:说三道四文库 发布时间:2017-02-23 01:24
HTML文档下载 WORD文档下载 PDF文档下载
procedure TForm2.Button1Click(Sender: TObject);
var l_aab01: string;
begin
  with AdoTable1 do
    begin
    l_aab01 := Edit1.text;
    Locate('aab01',l_aab01,[loPartialKey]);
    //if not Locate('aab01',l_aab01,[loPartialKey]) then
    //edit2.Text := 'error';
    edit2.Text := fieldbyname('aab01').value;
    edit3.Text := fieldbyname('aab02').value;
    edit4.Text := fieldbyname('aab04').value;
    edit5.Text := fieldbyname('aab05').value;
    end;
end;
procedure TForm2.Button1Click(Sender: TObject);
var l_aab01: string;
begin
  with AdoTable1 do
    begin
    l_aab01 := Edit1.text;
   if not Locate('aab01',l_aab01,[]) then
   begin
    edit2.Text := fieldbyname('aab01').value;
    edit3.Text := fieldbyname('aab02').value;
    edit4.Text := fieldbyname('aab04').value;
    edit5.Text := fieldbyname('aab05').value;
   end;
    end;
end; 
试试这样如何。
来晚一步!为什么要屏蔽
    //if not Locate('aab01',l_aab01,[loPartialKey]) then
    //edit2.Text := 'error';
呢,
去掉屏蔽就行
可是在edit.text中显示的数据并不是我要查找的数据?
这是为何?我以想了两天了,呜呜呜呜呜呜呜呜呜!
可是在edit.text中显示的数据并不是我要查找的数据?
这是为何?我以想了两天了,呜呜呜呜呜呜呜呜呜!
Locate('aab01',varArrayOf([l_aab01]),[loPartialKey]);
如何?
你检查一下是不是大小写不匹配的事!
procedure TForm2.Button1Click(Sender: TObject);
var l_aab01: string;
begin
  with AdoTable1 do
    begin
    l_aab01 := Edit1.text;
  if Locate('aab01',l_aab01,[loCaseInsensitive, loPartialKey]) then
  begin
    edit2.Text := fieldbyname('aab01').value;
    edit3.Text := fieldbyname('aab02').value;
    edit4.Text := fieldbyname('aab04').value;
    edit5.Text := fieldbyname('aab05').value;
  end
  else edit2.Text := 'error';    
end;
end; 
同意wanwangzhiwang(万王之王) 的说法
支持iOS 7.1!苹果发布Xcode 5.1更新 视频云将成为2014年乐视新的发力点 3月12日:万维网迎来理念诞生25周年 《近匠》云适配CEO陈本峰:跨屏移动,曲线一样救国 Intel陈荣坤:赢取移动市场的几个先决条件 而立之年,开发者在害怕什么? 首席工程师揭秘:LinkedIn大数据后台是如何运作的 年交易额1800亿美元,揭秘PayPal成功背后的三大热门技术 微软妥协Android?向该平台推开源Office 365 SDK 中国云计算大会PPT集萃(一):众多名家分享技术挑战与行业趋势 速度是现在的10000倍,出自物理学家之手的新型电脑 逗你玩?淘宝开放平台从4月1起开始全面收费 出现编程疲劳?千万别纠结 “编程竞赛界王子”教你更好的招聘程序员 SA:三星全球智能电视市场份额达26% Cocos2d-x 3.0分语言包发布 最新进展即将披露 友盟:社会化分享成为APP开发“标准配置” 从“简单”的封面设计剖析Netflix背后的数据哲学 与Linus Torvalds“并列”,虚拟化天才程序员法布里斯贝拉 让超级计算机和数据中心“飞”,Intel推800Gbps神器MXC 【OSTC讲师专访】Debian开发者李道兵:平静地理解开源 红帽推出开源业务流程管理套件:JBoss BPM Suite 6 科学研究证明:程序员快乐才能更好的工作 ChocolateChip-UI:能“逆转”的跨平台应用开发框架 分享12款最佳的Bootstrap设计工具 Apache Flex 4.12发布,支持iOS 7 智能手机应用挑战Web平台,看W3C如何反击? 电信级数据流量与监控系统部署案例分享 TCL联手Mozilla,HTML5智能电视真的要来了! 先睹为快:Unity亚洲开发者大会虚拟游览展示 OSTC·2014 演讲日程出炉,Perl创始人来了! 我的IE浏览网页的时候,在输入框中无法输入任何东东,怎么解决? 如何让工具栏按钮按下后不弹起来?如何做到一个TOOLBAR对应一个MENUITEM,由菜单来控制TOOLBAR的隐现? VB没市场了吗? 关于EditMask的问题,是PB的Bug吗? 147分求助:那有星际108B下载 文件存在判断 如何在com中运用ado的方法实现对数据库的操作??(急!!) OpenGL的入门级问题. 大家快帮帮忙啊!这个问题很棘手,公司在催!!! 急:我得到了窗口句柄,如何通过这个窗口句柄获取对应的窗口实例?? 请解释一下以下程序 搞了这么久,java还在入门阶段,太麻烦了!我要放弃? 有条proc 的语句不会写,大家帮一下忙! thanks a lot. 关于sql server中money 字段的问题 我真的很着急,你们大家都不会吗?还没人理我的话,我只好下网看帮助了!! 请问有什么关于数据库开发的好书么? 请问,在FRAME页中点击IE“刷新”按钮后如何只刷新一个frame而不刷新整个页面?? 请教(无为):关于VC与XML 向各位大侠求救!VB6如何直接输出到打印机?(有关POS机) 请问哪里有InstallShield下载啊 在FRAME页中点击IE“刷新”按钮后,如何只刷新一个frame而不刷新整个页面?? 使用VC+ATL生成控件,在VB中设计时属性窗口设置的值保存不住,运行的时候可以保存,是什么问题 怎样在dephi中用ado调用视图 ~~~动态设置数据窗口~~~~~~~~~~~~~~~~~~~~~~~~~~~! 一两狂死郎之天衣有缝:我是琳琳,提问有关音量问题的人。请来一下!! 有关李维的ADO/MTS/COM的问题,求救! vc与xml 请教:vc与xml 如何做象IE里最大化按钮下的转动的“e"字母? help!!!!!!!高分。。关于applet和servlet通信一个问题 JVM INSTR pop ;什么意思?高手帮帮忙! 如何访问子数据窗口中文本控件的text属性。在线等待!!!!!!!!!! 有的程序Dialog控件比Visual C++所提供的要多,不只是如何实现的?是自己做的吗? 我编了一个用MODEM-MODEM拨号对传的程序。但端口检测不正确,不能拨号。 怎么用installshield 实现软件加密? 急!如何将含NULL的string给MEMO字段赋值 请教:为什么我在WinXP上装完了vs.net,却无法启动?点击出现vs的初始画面,然后什么都没了? 请问hresult的错误码的意思,在哪里可以找到? 有关ORACLE的数据链的问题 我是琳琳,刚才提问有关音量问题的人。如果用一个TrackBar控制左右音道如何解决? 如何控制控件的显示层次! 单文档程序中的对话框中要打印和预览,该如何编程 有人能想通这是怎么算出来的吗? 如何设定objfilesys 一两狂死郎之天衣有缝:如果用一个TrackBar控制左右音道如何解决? 华山论剑 If ((p + 5) / 5) Mod 2 = 0 Then ...出错 ADODB.Recordset 错误 '800a0e78' ???????大侠 有没有办法实现AOL的ICQ中的位于桌面左右并排挤掉所有窗口包括桌面?? 在edit1的edit1keydown事件中为何不能向应button1.click事件??? 希望不要看见DBGrid中的一行记录,但不是要删除她, how? 一个长方体无盖的铁桶,长50厘米,宽40厘米,高30厘米.制作一个这样的桶,至少需要多少平方厘米的铁皮? 人类的未来生活会是什么样子的? 人生的意义是什么?——你的看法.失恋了,一段很深很纯的感情,迫于世俗的压力,我们分开了,哭过,痛过,醒来突然觉得生活没有目标了.家人都很好,我不禁想问人生的意义是什么? 网络可以给人们带来什么方便 人类的未来生活是怎样的 为什么环氧树脂胶水不能用于植筋 国际互联网能给我们带来什么方便 图中玻璃容器的底面积是96平方厘米,倒入645ml,水后再放入一个27立方厘米,小铁块这时容器里的水深多少厘米? 生活中最需要的是生命,你有什么看法?你如何看待生命的定义?有自己的见解! 复合胶条中空玻璃与铝条中空玻璃哪个比较好 玻璃上沾上胶水了,胶水已经干了,怎么才能擦干净?就是一般的粘纸用的普通胶水 用环氧树脂做植筋胶的配合比是? 怎样把夹胶玻璃PVB提出来 5+12A+5与5+9A+5的中空玻璃差价多少采用1.5mm厚的镀锌衬钢,最好具体说明一下价格差在什么地方.这是用在塑钢推拉窗上的,玻璃是用的张家港华尔润浮法玻璃 请问:玻璃容器的底面积是96平方厘米,倒入645毫升水后,再放入一个27立方厘米的小铁块,这时容器里的水深...请问:玻璃容器的底面积是96平方厘米,倒入645毫升水后,再放入一个27立方厘米的小铁 8+1.14(PVB)+8夹胶玻璃,谁给报个价钱多少一平方! 是否只有断桥铝可以用(匹配)5+12A+5的中空玻璃,其它凤铝型材不行(只能匹配5+6A+5中空玻璃)我要封阳台,用滑轨的门窗 玻璃的湿化夹胶与干化夹胶的区别 PVB夹胶玻璃和DOK聚酯玻璃哪个更隔音 一组双组中空玻璃密封胶能做多少中空玻璃 玻璃容器的底面积96CM2,倒入645mL水后,再放入一个27CM2的小铁块,这是容器里的水深多少厘米我要解答方式, 一块长方形铁皮,长40厘米,宽20厘米.焊接成一个高为5厘米的的无盖长方体容器,可以怎样制作?一块长方形铁皮,长40厘米,宽20厘米.焊接成一个高为5厘米的的无盖长方体容器,可以怎样制作,请你 为什么说中国人口过多影响经济的的发展 旭日梅兰玻璃厂推出的特殊湿法夹胶胶水有什么用,跟其他胶水有什么区别? 夹胶玻璃最常见厚度是多少? 如图所示,体积为V=200cm3的木块在绳子拉力F=0.8N的作用下完全浸没在水中(g=10N/kg,ρ水=1.0×103kg/m3,绳子重力不计).求:(1)木块此时受到浮力.(2)木块的重力.(3)剪断绳子,木块静止时 一个表面积为56平方厘米的长方体如图切成27个小长方形,这27个小长方体的表面积的和是多少平方厘米? 用一张长80厘米宽40厘米的长方体铁皮焊接成一个深10厘米的长方体无盖铁皮盒怎样焊接诶才使容积最大最大容积是多少 容器内有一定水,水中浸没有一木块,木块底部用一绳子拉住,已知容器底面积、木块体积、拉力大小,求木块受到的浮力大小;求当剪断绳子,待木块静止后,水对容器底减小的压强.(说出具体的 网络对人类的好处? 有一块长40厘米,宽20厘米的长方形铁皮,把它切割后焊接成一个高5厘米的无盖长方体容器.要使这个长方体容器的容积最大,它的容积是多少立方厘米?(铁皮厚度不计)要步骤. 体积为200cm^3的木块在绳子拉力F=0.8n的作用下浸没在水中1:木块浮力2:木块重力3:剪断绳子,木块排开水体积木块浮力=vρ水g=2N所以木块的重量=2N-0.8N=1.2N体积? 网络改变了我的生活这篇短文中网络给人类带啦什么好处 一块长方形的铁皮,长32厘米,在它四个角分别剪去边长4厘米的正方形,然后折起来焊成一个无盖的长方体铁皮盖,己知这个铁皮盖的容积式768立方厘米,原来这块铁皮的面积是多少? 体积为V=200cm³的木块在绳子拉力F=0.8N的作用下完全浸没在水中,g=10N/kg,ρ=1.0×10³kg/m³,绳子重力不记,求:1)木块此时受到浮力.2)木块的重力.3)剪短绳子,木块静止时排开水的体积. 哪种品牌胶水好用不会被晒干晾干,手去碰死死粘住. 《建筑玻璃应用技术规程》中提到公称厚度,请问如果是6+12A+6的中空玻璃的公称厚度是多少? 柱形容器的底面积是500cm2,重为5N的木块A在水中处于静止状态,此时绳子拉力为3N.若绳子突然断了,待木块再次静止时,容器水面将下降A、0.6*10-2MB、0.4*10-2MC、1.6*10-2MD、1.0*10-2M 乌鸦要放多少立方厘米的石子在水槽中,水面会与水槽口相平?水面距水槽口 玻璃的等效厚度和公称厚度一样么?如果不一样,公称厚度应如何计算?比如5+1.14PVB+5的玻璃公称厚度为多少 如何鉴别夹胶玻璃是夹胶片的还是灌胶的我想定购阳光房屋顶,想采购夹胶片的,但是听说还有一种是灌胶的(也就是湿法制作),不知道如何鉴别, 人类将来该怎么生存?人类的懒惰会造成将来的灭亡吗?我们将来究竟该怎么生存? 6+0.76pvb+6mm夹胶玻璃的厚度怎么算? 夹胶玻璃跟灌胶玻璃有什么区别?夹胶玻璃是不是胶片不会风化,而灌胶玻璃会风化? 碳纤维布粘贴胶是植筋胶吗 双休日的好处和坏处80字作文 夹胶玻璃的胶片如何防护 乌鸦喝水里的乌鸦在旁边没有小石子的情况下怎么喝到水? 【参考】300字文章,关于网络通讯工具的好处和坏处, 人口增长过快会给印度的资源,环境,经济发展带来什么影响 关于乌鸦喝水,如果瓶子旁边没有小石子,乌鸦怎么喝到水 做一个无盖的长方体铁桶,共用铁皮252平方分米.已知桶底是边长6分米的正方形,桶高多少分米?急!额,不用了- -我自己解粗来了。。谢谢各位了。。 一个底面积是96平方厘米、高10厘米的长方体玻璃容器,里面装有5厘米深的水.现在把一个铁珠子完全浸没在水(接上面的)中,水面升高2厘米.这个铁珠子的体积是对少?至少要放几粒这样的铁 在乌鸦喝水的故事中,聪明的乌鸦为了能喝到水,就把小石子放入圆柱形的水瓶中如果这个瓶子的底面半径是4厘米,放入石子后水面上升了5厘米.计算出放入石子的体积?公式···· 一个无盖长方体铁皮水桶,一共用去192平方分米铁皮,桶底是边长4分米正方形,桶高 一个地面积是96平方米高10厘米的长方体玻璃缸容器,里面装有5厘米深的水,放入一粒铁珠子,水面升高2厘米.问1:这个铁珠子的体积是多少?问2:至少要放几粒这样的珠子,水才会溢出玻璃容器? 乌鸦喝水,瓶子旁边没石子,乌鸦用什么方法喝到水 一正方形铁皮,边长是2分之5米,做一个长方体铁桶用去4分之3,还剩多少 5.一个底面积是96平方厘米,高10厘米的长方体玻璃容器,里面装有5厘米深的水.现在摆一个铁珠子完全浸没在水中,水面升高2厘米.这个铁珠子的体积是多少?至少要放几粒这样的铁珠子,水才会溢 听过乌鸦喝水的故事吧!聪明的乌鸦将小石子投到瓶里使水面上升到瓶口,从而喝到水.这个瓶子的容积是500ml,乌鸦往瓶子里放了32块小石子,每块石子的体积约是5立方厘米,求瓶子里原来大约有
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn