Recent update: 2008-3-11
169 byte By
msdn at 2008-3-11
我用DELPHI7+SQLSERVER2K做了个单机版的软件.
现在想把SQLSERVER和软件一起发布....想把SQLSERVER启动用到的文件,数据库,配置等一起打到程序包中.也就是要求用户在安装软件时,不用安装SQLSERVER.
求救啊....~~~~最好是有现成的包...
问题要是解决,再开帖给分......谢谢..
SSI ļʱ
300 byte By
msdn at 2008-3-7
为什么下面这段程序如果数据源是sql server时运行正常,而如果是acess时运行出错,如果查询到数据类型是数据型的话就会出错.把数据类型改为文本型时,运行又能正常.谢谢!!!!
procedure TForm3.Button1Click(Sender: TObject);
var
i,jls:integer;
s:string;
begin
i:=combobox1.Items.IndexOf(combobox1.Text);
s:=dbgrid1.Columns[i].FieldName;
with database_form.DataModule1.gj_ADOQuery1 do
...
SSI ļʱ
300 byte By
msdn at 2008-2-21
为什么下面这段代码运行时会出现这个错误:v`/`vproject gjglp.exe raised execption class eoleexception with message v`/`v参数 ygkq.qjss 没有默认值.v`/`v.process stopped.use step or run to continue.v`/`v数据库是用access. gjb是工资表,ygkq考勤表.谢谢!!!
procedure TForm5.SpeedButton1Click(Sender: TObject);
begin
with DataModule1.gjjs_ADOQuery...
300 byte By
msdn at 2007-11-19
procedure TUpdate_Form.FormShow(Sender: TObject);
begin
Dept_Form.ADOQuery1.Close;
Dept_Form.ADOQuery1.SQL.Clear;
Dept_Form.ADOQuery1.SQL.Add(v`/`vselect * from Dept where ID=v`/`v+IntToStr(Dept_Form.DBGrid1.Columns[0].Field.AsInteger));
Dept_Form.ADOQuery1.Open;
Update_Form.DeptName.Text...
246 byte By
msdn at 2007-11-17
有谁用过TDBLookupComboboxEh
在TDBLookupComboboxEh下,先下拉一个框,再切换输入法,程序就中止了???
放到调试状态下。出现以下提示,说是溢出,应该怎么解决??
Project ProShMa.exe raised Exception class EstackOverflow with message
v`/`vStack overflow v`/`v . Process stopped. Use Step Or Run to continue.
65 byte By
msdn at 2007-10-25
请问SQLConnection处理事务的详细用法?请给出详细代码!
例如先Update,再Delete,怎样用事务实现呢?
219 byte By
msdn at 2007-10-25
安装到中间会提示错误,ERROR REGISERING THE OCX C:/PROGR FILES\COMMON FILES\SYSTEM\OLE DB\OLEDB32.DLL
但到后面也提示安装完成,从新启动系统,可是配置ODBC不能通,提示说CONNT FAIL SQLSTATE v`/`v01000v`/`v
SQL STATEL v`/`v08001v`/`v
能告诉我怎么让我能安装成功,怎么能让ADO ODBC连接成功啊!
44 byte By
msdn at 2007-10-25
是不是MDAC把BDE改了?我怎么能把BDE删除,怎么能让MDAC装的BDE能用啊!
18 byte By
msdn at 2007-10-1
有没有办法不连接数据库就增加一行
300 byte By
msdn at 2007-10-1
建设有一个adoDataset或adoQuery 并已成功获得了数据如下
c_bh c_name c_sale
-------------------------------
001 a 100.00
002 b 200.00
003 c 300.00 <-----> 对应 DBGrid1
004 d 400.00
005 e 500.00
------------------...
300 byte By
msdn at 2007-10-1
下面这个是要实现登陆筐的制作
edit1,edit2必须用到
表为用户信息表
有用户名,密码两个字段
当点击确认按钮时会show form2 出来
我下面这个该怎么改呢?先谢谢大家了,就在我这个上面该就行了不用其它的方法了
procedure TForm1.Button1Click(Sender: TObject);
begin
with ADOQuery1 do
begin
close;
open;
sql.Clear;
sql.Add(v`/`vselect * from 用户信息表v`/`v);
if (Parameters.ParamByName(v`/`v用户名v`...
300 byte By
msdn at 2007-9-26
请问为什么动态设置ado组件为出现错误信息:
project project1.exe raised exception class EVariantTypeCasError with messagev`/`vCould not convert variant of type (Null) into type (string).process stopped.Use step or run to continue.
如
procedure TForm1.Button1Click(Sender: TObject);
begin
adotable1.Active:=true;
end;
en...
300 byte By
msdn at 2007-9-26
小弟有一事不解:
我用的是ACCESS数据库+Delphi 6,有一个表是这样定义的:XX(表名) 字段: id(自动增加),RR(char),JJ(char)
我写语句:insert into 表名 values(v`/`vNamev`/`v,v`/`vagev`/`v) 这句话在SQL里可以把记录给加进去,并且ID会自动增加,但是用ACCESS的话记录总是加不进去啊?,报错(原因可能是它把‘Namev`/`v传给ID而导致的),而且我 不想像insert into XX(RR,JJ) values(v`/`vNamev`/`v,v`/`vagev`/`v) 这样写,请帮帮小弟,...
66 byte By
msdn at 2007-9-26
在一个大的文件夹里有若干个子文件夹,需要对这些子文件夹足个压缩成一个ZIP 或 RAR 文件!
那位兄弟能救救我!!!
谢谢!
15 byte By
msdn at 2007-9-21
如题!
非常感谢
谢谢了
146 byte By
msdn at 2007-9-21
我想循环取tadoquery的行,取出指定列的内容,实例一点说,就是想取tadoquery的第5行第3列的数据,该怎么做呀?多谢
如果tadoquery不好实现,用其他的控件,比如tadodataset或者tadotable能实现吗?代码怎么写呢?小弟刚才c#转到delphi,请各位指点
300 byte By
msdn at 2007-9-21
我常做的是通信方面的软件对数据库不太熟,恳求一SQL语句:
表:
ID Field1 Field2 Field3 sSign
1 120.0 100.0 50.2 1
2 100 50 20 2
1 20 0 10 1
//*****************************...
219 byte By
msdn at 2007-9-19
select 货品全称, 货品类别, 基本单位, 进货价,
isnull(sum(进货数量),0)as 进仓数量,
isnull(sum(进货金额),0)as 进仓金额
from db_未结进仓
where 货品全称 =v`/`v白芷v`/`v
and 进仓数量 >2 --出错条件
group by 货品全称, 货品类别, 基本单位, 进货价
出错提示:列名 v`/`v进仓数量v`/`v 无效。
66 byte By
msdn at 2007-9-19
在delphi中应用ADOStoredProc引用两个存储过程,能否象ADOQuery一样可以建立主从关系??谁有例子看看??
91 byte By
msdn at 2007-9-19
我想在DBGridEh的一个数据格子里输入内容时,用一个edit.text立刻得到它所输入的值!不用按回车啊
因我想实现即时数据库筛选.
请问如何取得那个数据格子的text呢??
20 byte By
好项目 at 2007-9-8
QQ:695383411 注明是软件开发
300 byte By
msdn at 2007-9-8
1、Decal SDL 通用数据结构与算法类库
我个人认为是目前类结构建模建得很好的一个数据结构类库。
介绍
Decal的前身是 SDL,一套商业的通用数据结构与算法类库。Decal删除了其中关于垃圾回收部分的代码,而将其他部分全部开放源代码了,这对大家来说是一个好消息。Decal的全称是 Delphi Container and Algorithm Library,也就是Delphi 数据容器和算法类库。Decal是基于 Mozilla 开放源程序协议的一个数据结构类库,它的作者是Soletta。Decal的一些思想是来自Stepanov 和 Lee 的 C++ STL(Sta...
有错误的代码:
Adoquery1.SQL.Add('update account set balance=balance+:a where account_number in (select account_number from account_card where card_number=:c)' );
adoquery1.Parameters[1].Value:=form2.Edit1.Text;
错误提示我:'不能比较或排序text、ntext和 immage 数据类型,除非使用IS NULL 或LIKE运算符。'
300 byte By
msdn at 2007-8-23
我做的是一个三层数据管理系统,Cds_clsoder是TClientDataSet ,DS_clsoder是TDataSource,在一个窗口里做了
“插入“(F_DM.Cds_clsoder.Insert;)、
“修改“(F_DM.Cds_clsoder.Edit;)、
“删除“(F_DM.Cds_clsoder.Delete;)
“保存“(F_DM.Cds_clsoder.Post;F_DM.Cds_clsoder.ApplyUpdates(0);)
插入、修改都正常,当删除某一记录时,DBGrid上不见了,但当点击"保存"时,出错提示“Cds_clsoder:DataS...
262 byte By
msdn at 2007-8-23
1 、用缓存更新方式,要增加或删除一条记录,
用adoquery.append再用另外一个按钮UpdateBatch后却不能添加成功,
用adoquery.append
adoquery2.UpdateBatch(arall)也不对
请问在缓存更新方式下如何增加一条记录?
2、 缓存更新方式下,如果修改dbgrid中某条记录,这时如果鼠标在其它行点击一下就会退出编辑状态(我在保存按钮中是判断是否处于编辑状态来保存对dbgrid修改的),这样就不能保存修改了,
请问如何解决在缓存方式下的保存修改问题,急呀!!!
114 byte By
msdn at 2007-8-23
我是用了pagecontrol控件,当点击另外一页时先产生onshow事件,然后产生onhide事件。我需要先在原先的页的onhide事件中处理一下,不然会产生错误。如何才能先产生onhide事件,后产生onshow事件呢?急。
48 byte By
helen at 2007-8-15
我在数据库的表中建立了一个表,有id字段且设置为自动+1,再对表进行添加时,怎么老是会出错呢 ?
20 byte By
hgzp at 2007-8-15
394598399我的QQ号有什么问题吗
300 byte By
忘莜子 at 2007-8-15
有一个表COST里面有个DATE字段TYPE是DATE型。数据格式是2007-02-15
我现在想在DELPHI实现按照月份提取数据,比如在COMBOBOX的下拉列表中选择2就能查询出所有2月份的的数据。
我原来写的代码是
query1.DatabaseName :='d:\';
query1.Close;
query1.SQL.Clear;
query1.SQL.Add('select * from cost where month(date)='+''''+combobox2.text+'''');
query1.Open;
运行的时候报错 invali...
我是菜鸟,非常菜的那种。我的MDB数据库里有很多某部分相同的纪录,比如 姓名:“王二”“王三”“王守义”“王八”。我的问题是能不能通过什么查询只把所有姓王的都显示出来?谢谢!!
22 byte By
msdn at 2007-8-15
在报表设设器里怎么能得到需要打印的数据条数?
300 byte By
msdn at 2007-8-15
本人写了一个测试闰年的函数,在sql server 2000顺利运行通过:
if exists( select * from sysobjects where type = v`/`vfnv`/`v and name=v`/`visLeapYearv`/`v)
drop function isLeapYear
go
create function isLeapYear
(@year int)
returns int
as
begin
declare @days int
set @days = 365
if @year % 4 = 0
if @year % 100 <> 0
set...
276 byte By
msdn at 2007-8-15
我是做技术支持的,用C写点掌上机的程序
但是最近客户要求我对TXT到EXCEL转化,我对WINDOWS编程不熟悉,只晓得DELPHI的一写基本操作。
不知道如何实现这个问题。
具体问题是:一个EXCEL文件是一个工作簿,里面有多个SHEET,转化之后放在一个TXT里面,用“******************************”分开每个SHEET,同时每个SHEET里面的记录都补空格为定长,每个SHEET单独排序,存放在TXT中。当TXT拿到掌上机上面运行处理之后,又放到PC上反转回EXCEL 也要转成工作簿,且去掉空格。
100 byte By
msdn at 2007-8-15
有没有一个语句把adoquery查询到的数据一次性全赋值给listbox控件或别的string变量?
顺便再问一个,
用什么语句判断listbox中N行数据中有没有一行包含str字符串??
98 byte By
msdn at 2007-8-15
请问 怎样得到 一个窗体里面有很多richedit的句柄,意思是我要分别列出他们各自的句柄,该怎样操作?
注:单个的能找到,我要分别列出来 ,怎么做,我使用循环没有起作用, 请教一下各位
50 byte By
msdn at 2007-8-15
我想要以一个关键字搜索一篇文章的内容,把该文章中“所有”与该关键字相同的内容选中,如何实现???
52 byte By
msdn at 2007-8-15
请问有没有办法把两个不同的数据库中查出的数据(字段、结构完全相同)在一个Dbgrid中显示出来???
190 byte By
msdn at 2007-8-15
请教一个问题:
在跨数据库时,存储过程和触发器有没有用到,如用到,不同的数据库之间
你们是怎么进行动态切换的。是不是专门采用一个类去动态创建的,另外如
果用户用ACCESS怎么办? 现在我们系统中配置了ACCESS和SQL,没有用触发器和存储过程,请问你们在实际系统中是怎么做的呀。如果用ORACLE和SQL切换呢.这确实是实际中存在的问题,一些大的客户非要ORACLE不可.
300 byte By
msdn at 2007-8-15
with aqptSingleproductCustomer do
begin
close;
sql.Clear;
sql.Add(reptSingleAllCustomer.Lines.text);//把查询语句先写在一个RichEdit中
// showmessage(sql.text);
Parameters.ParamByName(v`/`vsProductv`/`v).value:=product;
open;
end;
出错:提示书签无效, 各位大哥要怎样写啊
reptSingleAllCustomer.Lines.text内容为v`/`v sel...
46 byte By
msdn at 2007-8-15
如何用delphi直接写xml文件,支持utf-16格式.我写的不支持utf-16格式.
46 byte By
msdn at 2007-8-15
请问在C/S结构中,dbExpress组件能不能取到客户端与oracle数据库的连接数.
111 byte By
msdn at 2007-8-15
装了delphi2005,玩了一阵后卸载。原来的Delphi6里面的BDE不能用了。想用ADOConnection连接VFP数据库,但是在连接字符串向导里面没有FOXPRO的DRIVER(机器已经装了VFP)。请教!
60 byte By
msdn at 2007-8-15
菜鸟的问题: 现在有2个Dbgrid,选中其中1个的记录以后,通过按钮,在另一个中显示.怎么解决.谢谢.请给出代码.
255 byte By
msdn at 2007-8-15
请问一下 我在一个edit中输入回车后,想调用按钮的函数,怎么写呢
if key=#13 then
begin
BitBtn1Click(Sender: TObject);
end;
为什么错那
[Error] Unitfind.pas(635): v`/`v)v`/`v expected but v`/`v:v`/`v found
[Error] Unitfind.pas(637): v`/`v.v`/`v expected but v`/`v;v`/`v found
为什么呢
300 byte By
msdn at 2007-8-15
select archive_id,Ecode,Ename,Eproperty,Eaddress,Ephone,Eboss,Handle_name,Handle_phone,Charge_dept,Account_name,Account_no,name,Account_property,khxk_no,state,remark,Sp_date,Modi_date,logout_date,Input_date
from enterprise_info a LEFT JOIN bank_map b on a.kh_bankid=b.bankid where name like v`/`v%建...
121 byte By
msdn at 2007-8-15
各位大大们, 报表中当我用到它的函数FREESPACE的时候
才发觉到,系统提示我FREESPACE没有定义。于是,我先后下载了几个版本,重新安装。
结果都发现了该问题。但是,我用其他功能都好用。请教是为什么?
请问这个函数要怎么用呢?
161 byte By
msdn at 2007-8-15
ListItem.SubItems.Add(FormatFloat(v`/`v#0.00v`/`v,QSENSORA.FieldByName(v`/`vMAXVALUEv`/`v).AsCurrency));
中的v`/`v#0.00v`/`v是什么意思啊? 为什么要在前加个#,有什么特殊的用途?
谢谢了,急
152 byte By
msdn at 2007-8-15
QUERY1的SQL=SELECT * FROM RS WHERE 员工编号=v`/`v+v`/`vv`/`vv`/`vv`/`v+edit.text+v`/`vv`/`vv`/`vv`/`v;
不知道如果是用TABLE来做数据源,想得到和上面QUERY语句一样的结果,不知该怎么写,请各位大哥指教.
61 byte By
msdn at 2007-8-15
如果我选择dbgrid1里的ID=11的那一行
那么让dbgrid2的光标 自动移到ID=11的那一行 怎么弄
174 byte By
msdn at 2007-8-15
update table1 set field1,field2,field3 = v`/`vabcv`/`v where ...
要一次修改多行的数据为同一个值可否用这样的语句.还是一定要field1= v`/`vabcv`/`v ,field2= v`/`vabcv`/`v ,field3 = v`/`vabcv`/`v
还是有其他方法.