您的位置：程序门 -> delphi -> 数据库相关

兄弟们解决解决没办法了哎呀!!!!!急!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!急急!!!!!!!!!!站等

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

兄弟们解决解决没办法了哎呀!!!!!急!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!急急!!!!!!!!!!站等

发表于：2007-06-09 11:35:51 楼主

shellＥＸＥＣute（self.handle, 'open ', 'usbholte.exe ',pchar（ 'usbdl.text= '+ 'manager '+ 'dlmm.text= '+ '1 '), 'usb ', 0);

用shellapi 调用 usbholte 程序能够调用但是用户名和密码好像没有传过去

我想是不是 usbdl.text=manager dlmm.text=1 不能这样设置

usbdl.text=manager 就是username dlmm.text=1 就是 password 密码

这个表达式应该怎么写??高分求救!!!!!!!站等!!!

发表于：2007-06-09 11:37:471楼得分:0

username 应该是控件名称还是要在源代码中设置????

发表于：2007-06-09 12:03:582楼得分:0

csdn 没希望了没希望了

发表于：2007-06-09 12:05:563楼得分:0

var
s: string;
begin
s := usbdl.text + ' ' + dlmm.text;
shellＥＸＥＣute（self.handle, 'open ', 'usbholte.exe ',pchar（s), 'usb ', 0);
end;

发表于：2007-06-09 12:40:144楼得分:0

还是只能打开应用程序.不能把参数传过去啊

发表于：2007-06-09 15:32:065楼得分:0

在被调用这边是不是也要设置??

发表于：2007-06-09 15:36:526楼得分:0

参数当然可以传过去,控制台程序参数传入是要用空格隔开的.
具体的看
cncharles（旺仔)的回复.

发表于：2007-06-09 16:07:117楼得分:0

空不空格到无所谓，主要看zl是怎么解析这个参数的。
是否分析参数错误呢？

发表于：2007-06-09 16:08:268楼得分:0

//被启动
procedure tform1.formcreate（sender: tobject);
var
s:string;
begin
if paramcount=0 then
showmessage（ 'error ')
else
begin
s:=paramstr（1);
edit1.text:=copy（s,1,pos（ '@ ',s)-1);
edit2.text:= copy（s,pos（ '@ ',s)+1,length（s)-pos（ '@ ',s));
end;
end;

===============启动===========
procedure tform2.button1click（sender: tobject);
begin
shellＥＸＥＣute（self.handle, 'open ', pchar（ 'project1.exe '),pchar（ 'hahah@test22xx '), ' ', sw_show);
end;

测试没有问题。

发表于：2007-06-10 08:30:279楼得分:0

能够调过去了但为什么提示密码错？？或者进不去子模块只能显示登陆对话框！不能执行回车？？？手工回车也不能进去？？？在系统中用 keydown（) 提示不能打开一个关闭的窗体我是在
formcreate（) 里执行上面的接受的代码的？有没有什么错误？？？

发表于：2007-06-10 09:29:4010楼得分:0

这很明显是你程序的问题了，你没有代码别人怎么帮你分析呀，跟踪一下看一看吧

发表于：2007-06-12 11:41:3211楼得分:0

我把用户名和密码传过去之后怎么点确定??比如: edit1keydown（sender,d,shift)??
我的用户名是通过录入拼音码比如: zs 回车之后是张三这个用户然后录入密码确定
我想了一个方法就是在formshow（)时在用户名控件处传入拼音码然后执行edit1keydown（sender,d,shift) 在把密码传过来在执行 edit2keydown（sender,d,shift) 但是好像还是不行????有没有其它的办法解决! 主要是确定（用户名和密码)

发表于：2007-06-12 12:02:5712楼得分:0

难道你的系统判断用户名密码需要keydown才能判断？？？？
你的系统也太...
这些东西封装好，调用不就得了

发表于：2007-06-12 12:04:1013楼得分:0

再说，拼音对应啥啊，又不是一一对应，搞不明白你搞什么

发表于：2007-06-13 00:12:1914楼得分:0

就是要操作员录入工号嘛!工号正确之后就返回用户名.然后在录入密码在确定

下一篇：dbgrid颜色条的设置
上一篇：如何实现adoconnection连接出错时的这种效果?

其他资讯