|
|
注意事项:严禁重复发贴或发相同贴到不同板块,严禁广告,否则一律删除或者直接禁用帐号! |
|
uses DateUtils,StrUtils; JPG |
bios |
2004/3/6 11:25:17 |
|
我试了一下 行了 呵呵,谢谢楼上大哥 |
cyh9519 |
2004/3/6 11:38:59 |
|
DateUtils,StrUtils 好像是D6新增加的
|
waterstone |
2004/3/6 13:43:26 |
|
把 if self.Components[i].ClassName ='tgroupbox' 改城 if ( sel …… |
xjr888 |
2004/3/6 12:38:03 |
|
for i:=0 to self.ComponentCount-1 do BEGIN if (self.Compo …… |
waterstone |
2004/3/6 13:37:11 |
|
偶那个是《电子公章》系统的DLL函数 他要先执行获取 证书,然后
签名,然后用共钥加密,私钥解密!然后用证书验证签名是 …… |
bios |
2004/3/6 12:29:09 |
|
BIOS 有志者事必成 我们在精神上支持你!!!
|
waterstone |
2004/3/6 13:31:43 |
|
var t:TColor; r,g,b:Byte;
canvas.pixels[x,y]; r:=GetRValu …… |
cjrb |
2004/3/5 21:32:39 |
|
学到!
|
waterstone |
2004/3/6 9:38:24 |
|
收到,老大,多谢了!
还有个问题:GetRValue(), GetGValue(),函数干吗用的?我在delphi的帮 …… |
asddd |
2004/3/6 9:50:42 |
|
var RGBColor : String; DelphiColor : TColor; begin R …… |
hotyei |
2004/3/6 12:56:04 |
|
//删除当前行。 var iRow,iCol:integer; begin with StringGrid …… |
cjrb |
2004/3/6 11:17:21 |
|
很麻烦要 整行整行的 去移动 后面的数据!没有快的办法! |
bios |
2004/3/6 11:18:49 |
|
while n < StringGrid.RowCount - 1 do begin StringGrid.Rows …… |
cjrb |
2004/3/6 11:19:44 |
|
要么: type TExCell = class(TStringGrid) public proce …… |
cjrb |
2004/3/6 11:21:49 |
|
cjrb 老大你怎么不开QQ? |
bios |
2004/3/6 11:40:16 |
|
有个叫<易表。NET》对于你以上的问题实现的都 过了火了! 可惜偶不懂他怎么做的 那是用VB做的强大啊! |
bios |
2004/3/6 11:17:50 |
|
怀着一颗持之以恒的心
|
waterstone |
2004/3/6 9:59:03 |
|
第一步,先把delphi写正确咯 |
cyh9519 |
2004/3/6 10:55:00 |
|
http://www.516688.net/ergong/ergong1.htm |
bios |
2004/3/6 11:02:08 |
|
最好是边编程,边学习
我也是个菜鸟,多多交流
QQ:122151616 |
liweiming |
2004/3/6 11:03:59 |
|
first, u must study object pascal,hardly. and second, no one …… |
mars_han |
2004/3/6 11:07:31 |
|
类似这样!
7) int EncryptWithCert(unsigned char *from, int le …… |
bios |
2004/3/6 11:07:11 |
|
??? 迷糊
|
waterstone |
2004/3/5 15:34:56 |
|
在.net中都可以用 |
hfqxfx |
2004/3/5 16:12:30 |
|
哪位有Microsoft VBScript Regular Expressions 5.5 |
hfqxfx |
2004/3/6 10:57:58 |
|
没有人会么? |
bios |
2004/3/3 19:07:49 |
|
提前 |
zxdcj |
2004/3/4 7:34:21 |
|
再提前 |
zxdcj |
2004/3/4 10:44:38 |
|
感谢 zxdcj 大哥支持!嘿嘿!
|
bios |
2004/3/4 13:42:56 |
|
嘿嘿,共同学习 工作搞定了吧? |
zxdcj |
2004/3/4 13:58:53 |
|
我记得有一个GetDriveType()函数不就可以吗? |
qdpingping |
2004/3/4 14:10:54 |
|
学习 |
ganbing |
2004/3/4 14:15:41 |
|
GetDriveType函数得到的是驱动器的类型,如软盘,硬盘,光驱,好像物理光驱跟虚拟光驱的返回值是一样的。 |
lines |
2004/3/4 14:16:06 |
|
…… 此帖回复超过12条,中间记录省略。 |
…… |
…… |
|
我怎么记得好像有人说过DRIVE_REMOTE就是虚拟光驱呢? |
qdpingping |
2004/3/4 14:48:01 |
|
有这样的代码,现在外地。忘了。 |
gselec |
2004/3/4 17:04:06 |
|
GetDriveType() 不行偶试过! 海宏)大哥可有资料么? |
bios |
2004/3/6 10:41:39 |
|
放在一个记录里可能有些麻烦,可以考虑一个元素放在一条记录里。这样表结构相对简单,处理也方便。 |
xjr888 |
2004/3/5 12:46:19 |
|
用MEMO试试 把你的数组数据用*或什么分隔放入 读出时再自己拆分
|
waterstone |
2004/3/6 10:05:55 |
|
怎么没人帮偶阿,555555 |
jalu_515 |
2004/3/4 16:51:08 |
|
用fastreport吧. 好好看看他的demo.有很好的帮助的. |
hebiziyu |
2004/3/4 18:09:00 |
|
我考,人气好差啊,斑竹帮忙撒,我昨天下了一个fastreport,是可以实现,但是我看原来的系统使用quickreport实 …… |
jalu_515 |
2004/3/6 10:02:57 |
|
PCHAR(edit.text) STRCOPY(edit.text,1,2)
|
waterstone |
2004/3/6 9:52:39 |
|
char ch;
if Edit1.text <> ' then ch := Edit1.text[i]; …… |
asddd |
2004/3/6 9:57:36 |
|
偶认为现在就用mssqlserver2000比较好,因为它直接就是网络版 不用升级
|
yuvo |
2004/3/4 21:50:15 |
|
可能是我的知识有限,我在用ACCESS数据库时的 所有在MSSQLS数据库库UPDATE 语句都不能运行.如果是真的话,那么 …… |
zpeihe |
2004/3/4 22:58:26 |
|
在用ACCESS数据库时可以运行UPDATE 语句,但是灵活性好象没有MSSQL好.
使用SQL,在程序发布时就麻烦了 …… |
jsjyx |
2004/3/5 8:17:20 |
|
用Sql Server,加密可以改注册属性实现 |
zxliang1999 |
2004/3/5 8:18:49 |
|
如果用 access 将来改成网络版时 需要编写远程数据模块的 app 服务器,客户端用 cientdataset, 要 …… |
xjr888 |
2004/3/5 12:31:29 |
|
装SQL比装WORD快多了。还是用SQL吧! |
playerjn |
2004/3/5 12:53:59 |
|
3楼的朋友能具体点吗? |
jsjyx |
2004/3/5 16:44:26 |
|
现在许多人选择ACCESS或SQL Server一个最大的关键在于所编写的软件是单机版还是网络版。
至于说 …… |
zsredmoon |
2004/3/5 16:56:28 |
|
…… 此帖回复超过12条,中间记录省略。 |
…… |
…… |
|
我看没有什么问题吗,字段类型都是 文本 ? |
xjr888 |
2004/3/6 8:39:20 |
|
是的,都是文本,但当执行这个语句时,就报错. |
zpeihe |
2004/3/6 9:17:53 |
|
我比较趋向于7楼的看法!
|
waterstone |
2004/3/6 9:55:15 |
|
① 求助高师 |
2 |
2004 |
zwn |
2004/3/5 21:44:18 |
|
看报表自己的例子。 |
cnxxx |
2004/3/5 23:44:46 |
|
在首页上见过一个汉化QR的例子,找找看!!
|
waterstone |
2004/3/6 9:42:13 |
|
放到KeyDown事件里 |
zxdcj |
2004/3/6 7:28:33 |
|
哦,相减出来的结果不对啊,比如edit1.text:=1000 edit2.text:=200 结果edit1.text: …… |
wealsh |
2004/3/6 7:37:08 |
|
那你这样好了 procedure TForm1.Edit2Change(Sender: TObject); begin …… |
zxdcj |
2004/3/6 7:58:45 |
|
还是不行哦,你试试看~~ |
wealsh |
2004/3/6 8:10:36 |
|
你将结果显示在其他地方试试! 你这样做恐怕很难达到你想要结果,建议你要KeyPress等键盘事件中拦截回车键,然后再算: …… |
iamdream |
2004/3/6 8:27:09 |
|
不会吧 RAR |
zxdcj |
2004/3/6 8:44:52 |
|
这是编译过的 RAR |
zxdcj |
2004/3/6 8:47:48 |
|
是不行啊,兄弟。。 你输入200试试~~~ |
wealsh |
2004/3/6 8:49:29 |
|
…… 此帖回复超过12条,中间记录省略。 |
…… |
…… |
|
那当然了 那你需要用另一种方式了,比如iamdream兄说的拦截回车一定可以的
|
zxdcj |
2004/3/6 8:57:23 |
|
这个能实现但不那么简单! 我再试试 |
zxdcj |
2004/3/6 9:18:23 |
|
//**********这样行了,但不太完善,你自己再看看吧****************** var Form1 …… |
zxdcj |
2004/3/6 9:24:27 |
|