编译程序时的错误，请大家帮一下啊，要不毕业都成问题了 啊？？？

[wlg68]

1.[C++ Error] Unit4.cpp(59): E2288 Pointer to structure required on left side of -> or ->*

2. Query1->Params[0]->AsString = Edit1->Text;这一行有错吗？
错误提示 是这样的啊！[C++ Error] Unit4.cpp(59): E2288 Pointer to structure required on left side of -> or ->*

3.Query1->SQL->Add("select*from"->"F:\gzgl1\A1.db" + "as s where s."Name"=:Department");还有这一行啊？

[wlg68]

[C++ Error] Unit5.cpp(63): E2089 Identifier 'Table1CalcFields' cannot have a type qualifier还有这个错误啊 知道的快点来啊给帮帮啊 要不就毕不了业啊？

[wlg68]

有人在吗 快点啊 啊好不好啊 帮帮我啊好吗 ？要不就毕业都成问题了啊 好吗 各位大狭 好吗？

[gfh_79_0]

给你一个例子看看：
Query1->Active=false;
Query1->SQL->Clear();
Query1->SQL->Add("SELECT * From T2_hour where RIQI >=:timeP1 and RIQI <=:timeP2");
Query1->ParamByName("timeP1")->AsDateTime=StrToDateTime(DateToStr(DateTimePicker1->Time-1)+" 23:59:59");
Query1->ParamByName("timeP2")->AsDateTime=StrToDateTime(DateToStr(DateTimePicker1->Time)+" 23:59:59");
Query1->Active=true;

[IT-司马青衫]

我帮你顶

[wlg68]

能不能具体的给点示例啊 好吗各位大狭 啊？

[yangfan369]

SQL语句有问题
你留个mail我做个例子给你发过去

[yangfan369]

从你几次发来的短消息看，你对SQL语句可能不太熟悉，有空看看这里：
SQL 语法参考手册
一、资料定义 ｄｄｌ（data definition language)
资料定语言是指对资料的格式和形态下定义的语言，他是每个资料库要建立时候时首先要面对的，举凡资料分哪些表格关系、表格内的有什麽栏位主键、表格和表格之间互相参考的关系等等，都是在开始的时候所必须规划好的。

１、建表格：
create table table_name(
column1 datatype [not null] [not null primary key],
column2 datatype [not null],
...）
说明：　
datatype --是资料的格式，详见表。
nut null --可不可以允许资料有空的（尚未有资料填入）。
primary key --是本表的主键。

２、更改表格　
alter table table_name
add column column_name datatype
说明：增加一个栏位（没有删除某个栏位的语法。
alter table table_name
add primary key (column_name)
说明：更改表得的定义把某个栏位设为主键。
alter table table_name
drop primary key (column_name)
说明：把主键的定义删除。

３、建立索引　
create index index_name on table_name (column_name)
说明：对某个表格的栏位建立索引以增加查询时的速度。

４、删除　
drop table_name
drop index_name

二、的资料形态 datatypes
smallint
16 位元的整数。
interger
32 位元的整数。
decimal(p,s)
p 精确值和 s 大小的十进位整数，精确值p是指全部有几个数(digits)大小值，s是指小数
点後有几位数。如果没有特别指定，则系统会设为 p=5; s=0 。
float
32位元的实数。
double
64位元的实数。
char(n)
n 长度的字串，n不能超过 254。
varchar(n)
长度不固定且其最大长度为 n 的字串，n不能超过 4000。
graphic(n)
和 char(n) 一样，不过其单位是两个字元 double-bytes， n不能超过127。这个形态是为
了支援两个字元长度的字体，例如中文字。
vargraphic(n)
可变长度且其最大长度为 n 的双字元字串，n不能超过 2000。
date
包含了 年份、月份、日期。
time
包含了 小时、分钟、秒。
timestamp
包含了 年、月、日、时、分、秒、千分之一秒。

[yangfan369]

三、资料操作 ｄｍｌ （data manipulation language)
资料定义好之後接下来的就是资料的操作。资料的操作不外乎增加资料（insert)、查询资料（query）、更改资料（update) 、删除资料（delete）四种模式，以下分 别介绍他们的语法：
１、增加资料：
insert into table_name (column1,column2,...)
values ( value1,value2, ...)
说明：
1.若没有指定column 系统则会按表格内的栏位顺序填入资料。
2.栏位的资料形态和所填入的资料必须吻合。
3.table_name 也可以是景观 view_name。
insert into table_name (column1,column2,...)
select columnx,columny,... from another_table
说明：也可以经过一个子查询（subquery）把别的表格的资料填入。
２、查询资料：
基本查询
select column1,columns2,...
from table_name
说明：把table_name 的特定栏位资料全部列出来
select *
from table_name
where column1 = xxx
[and column2 > yyy] [or column3 <> zzz]
说明：
1.'*'表示全部的栏位都列出来。
2.where 之後是接条件式，把符合条件的资料列出来。
select column1,column2
from table_name
order by column2 [desc]
说明：order by 是指定以某个栏位做排序，[desc]是指从大到小排列，若没有指明，则是从小到大
排列
组合查询
组合查询是指所查询得资料来源并不只有单一的表格，而是联合一个以上的
表格才能够得到结果的。
select *
from table1,table2
where table1.colum1=table2.column1
说明：
1.查询两个表格中其中 column1 值相同的资料。
2.当然两个表格相互比较的栏位，其资料形态必须相同。
3.一个复杂的查询其动用到的表格可能会很多个。
整合性的查询：
select count (*)
from table_name
where column_name = xxx
说明：
查询符合条件的资料共有几笔。
select sum(column1)
from table_name
说明：
1.计算出总和，所选的栏位必须是可数的数字形态。
2.除此以外还有 avg() 是计算平均、max()、min()计算最大最小值的整合性查询。
select column1,avg(column2)
from table_name
group by column1
having avg(column2) > xxx
说明：
1.group by: 以column1 为一组计算 column2 的平均值必须和 avg、sum等整合性查询的关键字
一起使用。
2.having : 必须和 group by 一起使用作为整合性的限制。
复合性的查询
select *
from table_name1
where exists (
select *
from table_name2
where conditions )
说明：
1.where 的 conditions 可以是另外一个的 query。
2.exists 在此是指存在与否。
select *
from table_name1
where column1 in (
select column1
from table_name2
where conditions )
说明：　
1. in 後面接的是一个集合，表示column1 存在集合里面。
2. select 出来的资料形态必须符合 column1。
其他查询
select *
from table_name1
where column1 like 'x%'
说明：like 必须和後面的'x%' 相呼应表示以 x为开头的字串。
select *
from table_name1
where column1 in ('xxx','yyy',..)
说明：in 後面接的是一个集合，表示column1 存在集合里面。
select *
from table_name1
where column1 between xx and yy
说明：between 表示 column1 的值介於 xx 和 yy 之间。
３、更改资料：
update table_name
set column1='xxx'
where conditoins
说明：
1.更改某个栏位设定其值为'xxx'。
2.conditions 是所要符合的条件、若没有 where 则整个 table 的那个栏位都会全部被更改。
４、删除资料：
delete from table_name
where conditions
说明：删除符合条件的资料。

说明：关于where条件后面如果包含有日期的比较，不同数据库有不同的表达式。具体如下：
(1)如果是access数据库，则为：where mydate>#2000-01-01#
(2)如果是oracle数据库，则为：where mydate>cast('2000-01-01' as date)
或：where mydate>to_date('2000-01-01','yyyy-mm-dd')
在delphi中写成：
thedate='2000-01-01';
query1.sql.add('select * from abc where mydate>cast('+''''+thedate+''''+' as date)');

如果比较日期时间型，则为：
where mydatetime>to_date('2000-01-01 10:00:01','yyyy-mm-dd hh24:mi:ss')

[wlg68]

扬帆远航 大哥 你看看这段代码 是我在你给我的 代码的基础上修改的
编译时没有错误可是到了运行时候 功能实现不了啊？就是？》
void __fastcall TFormchaxun::SpeedButton5Click(TObject *Sender)
{
OnClick=SpeedButton5Click;

Query1->Close();
Query1->SQL->Clear();
if(RadioGroup1->ItemIndex==1) //姓名被选中
Query1->SQL->Add("Select * From A1 as s where Name=:k");
else if(RadioGroup1->ItemIndex==0)//部门被选中
Query1->SQL->Add("Select * From A1 as s where Department=:k");
else if(RadioGroup1->ItemIndex==2)//号码被选中
Query1->SQL->Add("Select * From A1 as s where Num=:k");
else if(RadioGroup1->ItemIndex==3)//月份被选中
Query1->SQL->Add("Select * From A1 as s where Month=:k");
Query1->ParamByName("RadioGroup1->ItemIndex==0")->AsString=Edit1->Text;
Query1->SQL->Clear();
Query1->Prepare();
Query1->ExecSQL();
Query1->Open();
Query1->Close();
if (Query1->RecordCount == 0)
Label3->Caption = "对不起，没有记录！";
else
Label3->Caption ="记录找到！共有"+IntToStr(Query1->RecordCount) + "条记录!";



}

[starstargao]

程序错在什么地方贴出来

[wlg68]

好象是Query1->SQL->Add("Select * From A1 as s where Num=:k");这一行的错误啊但是
Query1->ParamByName("RadioGroup1->ItemIndex==0")->AsString=Edit1->Text;这一行好象也有错误啊我运行的时候说是 Param 里的一个name not found啊 不知道是怎么回事情啊
就是 实现不了 用 label 显示有多少条记录啊 ？

[888888888888]

关注

[wlg68]

扬帆大哥 ， 你好不好意思我的程序运行的挺 好的但是是在我的机子上啊
可是到了别的机子上怎么就不行了呢？
提示好象是 少个 dbrtl60.bpl 文件
是怎么回事情 啊 我是用的一个制作安装程序的软件做的一个
安装的 .exe的程序
也能装到别的机子上可是就是运行的时候出那个错误啊
着急死了要 大哥能不能帮我一下啊我们明天就要答辩了啊？？？

[Yesing]

全编译了吗?

[wlg68]

废话 我早就会了 啊大哥能不能帮个忙啊啊
我的程序都编译成.exe的程序了可是 为什么到了别的机子上就用 不了呢？
说是少个 dbtrl60.bpl文件啊是怎么回事情啊？能不能帮我一下啊好吗各位大哥啊？