DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡ ①
DELPHI技术
lazarus/fpc/Free Pascal
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡ ②
发布代码
发布控件
文档资料
经典工具
≡事务区≡ ③
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入： coooyang
今日帖子： 31
在线用户： 9
导航： 论坛 -> DELPHI技术 斑竹:liumazi,sephil  
作者：
男 heynickal ★☆☆☆☆ -
普通会员
2004/3/9 22:08:32
标题：
如何从表中取数据 浏览:1638
加入我的收藏
楼主：   hbh:=trim(edit2.text);//航班号
  ADOQuery1.sql.clear;
  sqlstr:='select 机型,班期,行程,隔日,起飞时间,起飞地点,起飞机场,降落时间,降落地点,降落机场,经济舱,商务舱,头等舱,儿童,折扣';
  sqlstr:=sqlstr+' from 航班表';
  sqlstr:=sqlstr+' where 航班表.航班号=hbh';
**  label6.caption:=fieldbyname(航班号).asstring;
  ADOQuery1.sql.add(sqlstr);
  ADOQuery1.execsql;

　　运行的时候带*的地方提示错误，说是fieldbyname未定义，那我想问一下fieldbyname在什么时候用
　　而且，如果我想从一个表中取数据出来，应该怎么做，谢谢
----------------------------------------------
-
作者：
男 chengyao (百炼成尧) ★☆☆☆☆ -
盒子活跃会员
2004/3/10 9:08:15
1楼： 只是取数据出来用得着这么复杂么？
----------------------------------------------
Function IThink(Boy,Girl : TPerson) : String;
begin
  if Boy.钱 < 10W then Girl.Say(''滚!'') else
  begin
     if Girl.Anser = ''我愿意'' then
     Result := ''结婚'' else
     Result := IntToStr(88);
  end;
风过不折→百炼成尧 QQ: 7315910
作者：
男 minche (异杰) ★☆☆☆☆ -
盒子活跃会员
2004/3/10 9:32:55
2楼： 你的数据集都没有打开,怎么就去取数据呢?
----------------------------------------------
-和大家一起学习,一起进步！！！
作者：
男 heynickal ( ) ★☆☆☆☆ -
普通会员
2004/3/10 14:30:47
3楼： 那要怎么打开数据集呢？：（
----------------------------------------------
-
作者：
男 ddzhouqian (007) ★☆☆☆☆ -
盒子活跃会员
2004/3/10 14:39:28
4楼： ADOQuery1.open
----------------------------------------------
-按此在新窗口浏览图片
作者：
男 minche (异杰) ★☆☆☆☆ -
盒子活跃会员
2004/3/10 14:47:38
5楼： 这样:
 hbh:=trim(edit2.text);//航班号
  ADOQuery1.sql.clear;
  sqlstr:='select 机型,班期,行程,隔日,起飞时间,起飞地点,起飞机场,降落时间,降落地点,降落机场,经济舱,商务舱,头等舱,儿童,折扣';
  sqlstr:=sqlstr+' from 航班表';
  sqlstr:=sqlstr+' where 航班表.航班号='+hbh;
  ADOQuery1.sql.add(sqlstr);
  ADOQuery1.execsql;
**  label6.caption:=fieldbyname(航班号).asstring;

----------------------------------------------
-和大家一起学习,一起进步！！！
作者：
男 heynickal ( ) ★☆☆☆☆ -
普通会员
2004/3/10 15:24:35
6楼： 嗯嗯，我改了，改成：
  hbh:=trim(edit2.text);
  ADOQuery2.sql.clear;
  sqlstr:='select 航班号';
  sqlstr:=sqlstr+' from 航班表';
  sqlstr:=sqlstr+' where 航班号='+hbh;
  ADOQuery2.sql.add(sqlstr);
  ADOQuery2.execsql;
  label6.caption:=ADOQuery2.fieldbyname('航班号').asstring;//fieldbyname前面有个"ADOQuery2";)

可还是不行啊，提示我所输入的列名无效：（~~~~~~~~

----------------------------------------------
-
作者：
男 heynickal ( ) ★☆☆☆☆ -
普通会员
2004/3/10 15:30:30
7楼： 我再改成：
  sqlstr:='select 航班号';
  //sqlstr:='select 机型,班期,行程,隔日,起飞时间,起飞地点,起飞机场,降落时间,降落地点,降落机场,经济舱,商务舱,头等舱,儿童,折扣';
  sqlstr:=sqlstr+' from 航班表';
  sqlstr:=sqlstr+' where 航班号=:hbh';

提示是Adoquery2.field航班号没找到~~~~
真是晕倒~~~~~
----------------------------------------------
-
作者：
男 heynickal ( ) ★☆☆☆☆ -
普通会员
2004/3/10 15:45:25
8楼： 我在网上找了好多例子，看到的都是query的，是不是ADOquery不能用fieldbyname？
----------------------------------------------
-
作者：
男 minche (异杰) ★☆☆☆☆ -
盒子活跃会员
2004/3/10 15:56:32
9楼： ADOQuery也可以用
是不是你的表里面没有这个字段.
----------------------------------------------
-和大家一起学习,一起进步！！！
作者：
男 heynickal ( ) ★☆☆☆☆ -
普通会员
2004/3/10 16:16:22
10楼： 我快哭死了
昨天晚上弄了一晚上，今天又是一天，我就为这么一个问题折腾了快两天了

有的有的，当然有的啊
你有没有QQ啊，加你QQ问你成吗？
我的8117703
感激不尽啊~~~~~~~~
----------------------------------------------
-
作者：
男 minche (异杰) ★☆☆☆☆ -
盒子活跃会员
2004/3/10 16:18:46
11楼： 可以
我的
qq:2768961
----------------------------------------------
-和大家一起学习,一起进步！！！
作者：
男 minche (异杰) ★☆☆☆☆ -
盒子活跃会员
2004/3/10 16:33:29
12楼： 我找了你的症结所在:
你不要用ADOQuery2.execsql;//这个动作只执行sql语言并没有得到数据
 用ADOQuery2.Open;
----------------------------------------------
-和大家一起学习,一起进步！！！
作者：
男 heynickal ( ) ★☆☆☆☆ -
普通会员
2004/3/10 18:45:37
13楼： 改了，改成为：

procedure Tnewticket.Edit2Exit(Sender: TObject);
var
  hbh,sqlstr:string;
begin
  hbh:=trim(edit2.text);
  ADOQuery2.sql.clear;
  //ADOQuery2.Open;
  sqlstr:='select 航班号,机型,班期,行程,隔日,起飞时间,起飞地点,起飞机场,降落时间,降落地点,降落机场,经济舱,商务舱,头等舱,儿童,折扣';
  sqlstr:=sqlstr+' from 航班表';
  sqlstr:=sqlstr+' where 航班号="CA1218"';
  ADOQuery2.sql.add(sqlstr);
  ADOQuery2.Open;
  //with ADOQuery2 do
  label6.caption:=ADOQuery2.fieldbyname('航班号').asstring;
end;

　　为了测试，我让查找为固定值的记录，可现在的提示是“列名CA1218无效”~~~~~~
　　晕倒~~
----------------------------------------------
-
作者：
男 heynickal ( ) ★☆☆☆☆ -
普通会员
2004/3/10 19:58:20
14楼： 各们来帮忙看看吧，看最后一个我回的就行了，我都等了两天了啊~~~
拜托了
谢谢了

----------------------------------------------
-
作者：
男 minche (异杰) ★☆☆☆☆ -
盒子活跃会员
2004/3/11 8:54:48
15楼： 这一句:sqlstr:=sqlstr+' where 航班号="CA1218"';
改成:sqlstr:=sqlstr+' where 航班号='CA1218'';
----------------------------------------------
-和大家一起学习,一起进步！！！
作者：
男 heynickal ( ) ★☆☆☆☆ -
普通会员
2004/3/11 10:28:18
16楼： 嗯嗯，好好
成功了~~~~~~~~~~~~~~
真是太感谢你了
可为什么用""不行就要用那么多的'呢
不解......
----------------------------------------------
-
作者：
男 minche (异杰) ★☆☆☆☆ -
盒子活跃会员
2004/3/11 10:35:03
17楼： 这就是delphi的语法要求的
----------------------------------------------
-和大家一起学习,一起进步！！！
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v3.0.1 版权所有 页面执行203.125毫秒 RSS