procedure TForm1.Button1Click(Sender: TObject);
var cmdstr:string;
begin
cmdstr:='rundll32.exe user32.dll LockWorkStation';
winexec(PChar(cmdstr),9);
end;
DELPHI高手请进!怎样在 delphi中实现屏幕锁定?
直接调用系统命令：procedure TForm1.Button1Click(Sender: TObject);var cmdstr:string;begin cmdstr:='rundll32.exe user32.dll LockWorkStation';winexec(PChar(cmdstr),9);end;
delphi问题请高手指点。
1。窗口上放置四个EDIT:ID,NAME,AAA,BBB (仅是举例你想放几个就放几个)2。回车能切换输入焦点到下一个EDIT,设置方法 EDIT的taborder按顺序设置,其他空间的tabstop属性为false 设置输入窗口的KEYPREVIEW属性为true 3。在窗口的onkeypress事件中写下如下代码:procedure TForm1.FormKeyPress(Sender: TObje...
在Delphi中怎么打开一个Excel文件,高手请进!
有三种方法：1.使用服务容器。在delphi控件面板里有一个servers页面，里面有所有支持的服务容器。你把excel相关的看看，放几个在form上面尝试一下就可以了。不是很困难。2.如果你不喜欢用容器，你可以使用ole方式，直接与excel交换数据。这样做比较慢，但是可以深刻了解到excel的数据结构。在delphi里面可以...
delphi 如何不让鼠标在不移动下实现模拟点击
如果想像按键精灵那样实现全屏任意地方任意点击的话，必须移动鼠标。想不移动鼠标进行点击，那就得有针对性，针对某个程序的某个控件，取得该控件的Handle进行SendMessage
delphi中如何实现关闭窗口?
关闭窗口很简单，可以关闭自己程序的窗口，也可以关闭其它程序的窗口。关闭自己程序的窗口只需要调用相应窗口的close方法即可，比如Form1.close;关闭其它程序的窗口需要知道它的HANDLE，用过程PostMessage可以关闭，比如：PostMessage(handleWID,WM_QUIT,0,0)...
delphi delphi中如何实现对计算机的远程控制?比如在教师机上控制学生机...
老师的机器上面装有服务器程序，学生的机器在启动的时候要连接到老师所用的那台服务器那边，之后老师的服务器程序可以向学生的机器发送一些自定义消息过去，学生的机器上收到这些消息后，转向相应的处理。具体的实现可以用 FastNet 面板上面的控件实现数据通讯。Delphi 也有关于数据通讯的Demo ...
Delphi程序如何自适应屏幕分辨率?
A、用panel布局...B、借助screen对象得到屏幕宽高... 窗体resize的时候 ...重新计算并调整每控件的left和top值
DLL与EXE程序问题,DELPHI高手进
1、EXE是独立的程序，有主动的目的，最常见的模式就是“输入+处理+输出”，运行它总会做点儿什么实际的事儿。事毕是否有能让人一眼看到的事件发生，则要看程序的输出设计了：显性的事件有在屏幕上输出计算结果，隐性的事件有在磁盘上创建一些文件，或者干预系统中的一些对象，例如关闭另外一个程序。追...
Delphi7中在下面这段代码中, 我想要添加实现下面几个功能:
procedure TForm1.Button1Click(Sender: TObject); begin if(edit1.text='6')or (edit1.text='7')then begin edit2.Text:='今天是休息日，工作的话有双倍工资'; form1.color:=clred; edit2.color:=cllime; end; if(edit1.text>='1')and(edit1.text<='5')then begin edit2.Text:...
懂编程的高手...请进!菜鸟也可以进但不要瞎说...拜托!
开发环境。如vb和delphi都有很好的界面，而vc更适合系统软件的开发，而java适于网络和跨平台 的软件的开发，而javascript和vbscript等适于网页和简单的编程，理解他们去别的方法就是学习 他们.在学习中发现区别和联系 2.一般情况下，现在写一个软件有很大的可能要用到好几种语言，这是为了应用各个语言的...
