Recent update: 2008-6-10
就像OICQ发送信息的按键。
试了N次,还是失败,真不爽!
怎样向表中插入一个日期型数据. 假如用access建表. 有一个日期型的字段. 怎样用sql插入. 还有一个问题 . 字符串型 是 %s 整型 是不是%d 哦? 还有日期型.又是啥子喃 ? 帮帮我啊 !
delphi中下面语句咋是错的喃? if 语句1 or 语句2 then begin ... end; //例如. if edit1.text='' and edit2.text<>'' then begin ... and 杂个不行喃. ? 应该咋写哦 . ?
我想写一个软件实现这样的功能: 监视一些设备的状态,当状态发生改变时,就把这些信息通过email的方式发送给管理员。我对此没有概念,请大家指点。
在DELPHI里有没有一个函数可以自动识别字符串里的长字符和短字符,把 ‘一二三四’、‘12三四’和‘1234’的字符串长度都算成4呢?
我用多线程写了一个搜索文件的程序,当搜索完毕后,线程停止这时用 Assigned(MyThread) 判断值为TRUE,说明这个实例还在,如何在线程停止后释放这个实例.
230 byte By
imacih at 2008-5-24
本人做了一个小程序,用ADOQurey连接SQL Server 2000数据库,客户端在很大一部份机器上运行正常,但有些机器却出现了错误,错误信息如下: aqryWeWaterNumberByMonth: Type mismatch for field 'Number',expecting:LargeInt actual;BCD 请问这是什么问题?应该怎样解决? 谢谢!
http://www.Codefund.cn/cnshare/soft/13/13646.shtm 谢谢了 呵呵! 散分 呵呵!
必给分
能不能在一个程序(test)一运行结束就把系统时间改成一个特定的数值。我的基本思路: 写一个小程序,判断test程序进程一结束,就把系统的时间改过来。 不知道各位大侠的看法如何,请指教,谢谢!
我是大学生,计算机的,可是感觉学不到东西,只有自学,但是这样很可能就会耽误学习,结果是从修,而且费用好高,我该怎么办,我想到唯一的方法就是快速产生利润,看着别人搞ASP的都已经有了利润,心理好不平衡,难道学DELPHI没有前途吗??
我经理说学Delphi的在美国找不道工作.请问Delphi的前景怎么样呢? Delphi难学么,如果有VB和C的基础,多久才可以精通呢?
我的资料录入界面做了8个edit 分别是 edit1员工工号 edit2员工姓名 edit3货物编号 edit4单价 edit5数量 edit6克数 edit7总金额 edit8时间 然后是3个按钮,保存,取消,修改 我希望每次按保存按钮的时候马上写入EDIT的内容进数据库 然后马上把8个EDIT的内容清空 让用户继续输入其他内容 但我更希望可以把EDIT1改为COMBOBOX,保存上一次一条记录让用户可选 这样可以吗 edit1...
我用的是两个pchar变量比较,一开始pchar1=pchar2的方法,发现没有用,似乎结果总是不相同。。。接下来我用strcomp函数则可以根据返回值判断是否相同,请问为什么?
delphi的cgi写查询系统?提供思路!给分
edit4是单价 edit5是数量 edit6是克数 edit7是总数 总数=单价*数量*克数 请问在edit7的什么事件里面写当焦点到edit7的时候自动计算结果 请提供代码
我的数据库结构 Parent Child 001 002 001 003 002 004 002 010 003 030 004 100 ... ... 我要把这个结构加到TreeView(就是以树结构显示出来) 我现在用递归方法可以做到, 但如果数据量少的时候还没什么问题, 但如果数据量大了就惨了, 我现在已经有3000多条纪录, 做完要15秒左右, 但我的数据量还会增加的, 可能会到10000, 到时候的速度就惨不忍到了, 谁能帮我改善一下算法 我现在是这样做的 rocedure TZFMF.AddNode(Str1: string); var i:intege...
网卡的标识是唯一的,我想获得网卡的编号,以字符的形式返回,怎么做呢? 用什么API?
a表里面有id字段和name字段是对应的 我在edit1填写id 然后怎样提取对应的name并赋值给edit.text 别让我用什么dbedit 我需要使用 sql 请提供代码谢谢
在客户/服务器(delphi/sqlserver)环境下,我想实现自动生成关键字并递增,不用自增型IDENTITY(比如我生成字符型的唯一单据号码),又不想使关键字冲突,怎么做? 有没有好方法?用sqlserver7数据库服务器。
要求判断6位以内的数字长度! 如果是一位,在数字前加5个0 如果是二位,在数字前加4个0 .. 保持六位长度 用来给数据自动编号!
谢谢!
我用的是DELPHI自带的数据库! 我做了一个带存储图片的表 在测试时存储了一些图片很大!有5,6M 我在前台进行了删除!表中以无记录可是表的体积一点也没减少!我查资料说 ,删除不是真正的删除而是再表中做个记号!但是如此一来,这个表的体积将无限期增长!!苦恼!!!!!!!!!!!!!!
问一个delphi的打印报表问题(在不知道列的数目下动态添加QRDBText控件) 问个问题: 如何在delphi的打印报表的时候 动态添加要打印的列 不知道下边的程序对不对 我试乐怎么什么都出不来 是不是控件的位置没有设置? 如何做 help thanks procedure TPrintPreview_department.FormActivate(Sender: TObject); var i:integer; alabel:TQRLabel; atext: TQRDBText; begin //添加控件 并设置数据级等属性 for i:=1 to Datamo...
搞了几年的计算机了,俺还是不理解上面的问题,这次厚着脸来问问大家!
我在unit1的public里定义了两个函数,为什么在unit2里无法引用,我在uses里已经加了unit1?
2 byte By
drmy at 2008-2-18
如题
如何升级金山毒霸? 我记得有一个工具,叫什么《金山毒霸注册码计算》什么的,,具体我也记不清了, 哪位同志知道,请告诉在下。。 谢谢,不胜感激!~`~
哪儿有这样的函数?
我想在局域网中某服务器上做个程序,每隔一定时间就发送一个报文给网中的另一客户机,如客户机的那程序工作正常,则返回一个正确的报文,若工作不正常或已经被终结程序,则返回错误的报文。我该怎么做。因我从未做过网络方面的程序,最好哪位大侠能给点代码参考。
那位仁兄有的话能否寄一份给我?不甚感激! email:zhang_ting@fescomail.net
求一个函数 功能:取界面的edit控件的text属性,如为空则提示此项未填 edit控件的name是从表中取的,就是根据表中的信息判断哪些edit控件需做不为空的判断,谁有好方法。 备注:不要遍历
533 byte By
yafun at 2008-2-18
有一个access数据库,其中一表内容如下: 代码 名称 0001 A公司 0002 B公司 另一表内容如下: 日期 公司代码 公司名称 发票号 零件号 数量 2002-01-01 K0001 A公司 IN00001 9432-1046 100.00 2002-01-01 P0001 B公司 IN00002 9432-1047 200.00 2002-01-01 K0001 A公司 IN00003 9432-1048 150.00 2002-01-01 K0001 A公司 IN00003 9432-1049 50.00 生成另一个表,内容如下: 日期 代码 名称 发票号...
我想在一个表中select某几个列 但是不知道列名 请问该怎么办? 是不是就用: select col(1) as ...
在分割条上可以放置按钮
case (StrToInt(Item->Caption)) begin case 1 : ListView1.Canvas.Brush.Color = clRed; case 2 : ListView1.Canvas.Brush.Color = clYellow; case 3 : ListView1.Canvas.Brush.Color = clWhite; case 4 : ListView1.Canvas.Brush.Color = clBlue; case 5 : ListView1.Canvas.Brush.Color = clBlack; case 6 : L...
我用的是delphi7各位知道怎么打包吗,请指点,谢谢
我在SQL中用手动备份,为什么不能生成两个文件,一个mdf和ldf文件呢 我是这样写的: backup database paper to disk = 'f:\data.mdf'
RX 控件中的DBDATEEDIT 不能改动对话筐的语言格式,还有其它的办法吗?谢谢!
我想做一个类似TDBNavigator的控件,但不要图标,要中文按钮,一定是自己做的控件啊,怎么做啊?是不是继承TDBNavigator类,然后在上面该,如果是,怎么改呢?很急,敬请高手指教!!
我是这样作的,如下,但有一点,如果必填数据多了,我照此列举下去岂不是很糟糕, if Trim(edtName.Text)='' then begin application.MessageBox('请输入姓名','提示',MB_OK); edtName.SetFocus; result:=False; exit; end; if Trim(edtBname.Text)='' then begin application.MessageBox('请输入简称','提示&...
在TMonthCalendar控件的事件中没有onchange事件,有可以代替onchange事件的事件,请教?
请问。如何这样做到。比如你做好一个文本编辑器后。通过建立文件关联后。一点文本就用自己的软件打开了。可现在是一点文本,自己软件倒是打开了。可文本并没有打开,就是关于这个参数传递怎么写呢?
如何加载动画光标,该调用哪些函数?
想问一下一些常见词的标准统一的翻译,如数据在保存前需要检查必填项目是否已填写,我称为完整性检查,你们呢,函数名为InteriryCheck,你们看如何, 另能够提供一些常见的默定速成的翻译
我用一个FORM1动态创建多个FORM2,FORM2的名字不同; 在另一个静态FORM3中能否判断一个特定FORM2是否被创建?
var WordApp,DocApp:Variant; begin WordApp := CreateOleObject('Word.Application');//创建Word线程 DocApp:=WordApp.Documents.Open('CaseSetup.dot'); end; 在执行WordApp := CreateOleObject('Word.Application');语句时总是出错,提示‘被呼叫方拒绝接收呼叫’ 请问各位大侠这是什们原因,莫名其妙?...
在VB中可以 dim b(10) as byte b(0)=100 b(1)=20 ..... b(10)=134 mscommm1.output=b 在delphi中再这样写就会提示 [Error] Unit1.pas(36): Incompatible types: 'OleVariant' and 'Array' 那在delphi中该如何发送字节数组??用的同样都是微软的comm控件。 mscomm1.output:='abcde';用8位的单片机接收时会收到97,0,98,0.....实际发送的是16字节的...
基本问题:如何选中行(快接键),由函数声明处如何快速的跳转到函数体, 另: dbg:Tdbgrid; dbg1=Class(Tdbgrid); 非得dbg1(dbg)这样才能访问TdbGrid的被保护成员,为什么 dbg不可以直接访问