delphi我很弱，希望高手耐心指点，谢谢各位先! 函数原型： //__int16 __stdcall Z8_GetTime(HANDLE icdev,unsigned char addr,unsigned char *time); 功能：返回time，格式为16进制 如06-9-6 20:23:12：0x06 0x09 0x06 0x20 0x23 0x12 DLEPHI 定义： Function Z8_GetTime(icdev:integer;addr:integer;time:pchar):integer; stdcall; far;external 'Z8rf3...

uVirtKey Long，欲转换的虚拟键 uScanCode Long，键的扫描码。如键处于抬起状态，会设置高位（设为1）；如按下，则清除高位（设为0） lpbKeyState Byte，描述了键盘状态的一个256字符数组的第一个条目。参考GetKeyboardState函数，了解关于这个数组更多的情况 lpwTransKey Integer，用于装载转换过后的字符的一个整数变量。可用 chr()函数将这个值转换成一个字串 fuState Long，如一个菜单处于活动状态，则设为1 dwhkl Long，欲用于转换的一个键盘布局的句柄 uScanCode 这个参数不懂，抬起，按下...

如何提取光标位置的英语单词，不用API HOOK ，我在这里先谢了。

废话不多说 ，问题如下（拜谢!）： DLL函数原型 __int16 __stdcall Z8_ReadDevInteractRecordValue_Hex(HANDLE icdev,unsigned char addr,int * snlen,unsigned char * snrdata);//成功返回0错误返回-1 说明：调用此函数后返回snrdata的数据的数组空间每条数据长11字节，每次最多读6条 DELPHI代码 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Gra...

发送一个按键到另一个程序使用以下两种方式 Sendmessage(handle,WM_KeyDown,VK_F1,0) (部分进程屏蔽了该消息) keybd_event(VK_F1,MapVirtualKey(VK_F1,0),0,0) keybd_event 需要窗口获得焦点后才可以，sendmessage 直接通过句柄发送 问题一：以上两种按键方式在应用程序接受时用代码如何区别（） 问题二：象键盘hook，发送到别的窗口的按键能拦截，但是不能修改发送给该窗口的按键码， 请问，如果想实现修改该按键码应该怎么做？希望有经验的朋友给个思路!...

任务管理器里面的进程隐藏了，但是里面应用程序一栏还是能够看到的。。。。。。。。 怎么办？

各位高手： 在Delphi中如何實現屏幕取詞？ 本人近來編寫一個海關品名程序（單機Access版)，即像金山詞霸那樣當在Edit中輸入Access檔裡相應的英文時，可在旁邊Meom看見相應的翻譯；現在想實現當鼠標移動運英文單詞上時像金山詞霸那樣能有相應的翻譯!不知道如何實現，網上找到，不知道如何下手？承蒙高手賜教？？？

已知一个点A和B的横纵坐标,如何确定一个点C,使C点在A和B连线的延长线上,并且和B点的距离为100 这个问题上学好像学过,现在忘了,呵呵

我在现在的项目中用ShellExecute(0, 'Open', PChar(strFileName), Nil, Nil, SW_SHOWNORMAL);打开了一个与文件相关连的外部应用程序,现在想重新设置一下窗口标题和屏蔽一些菜单的功能,怎么办? 不想再重写这个应用程序了,那样太费时费力了.

在程序中显示鼠标所在位置的图像,要求即时显示,鼠标移动,显示的图像随着鼠标移动变化,而且要求显示的图像是经过放大处理的,而且要不影响其他程序的鼠标操作 高手指点啊!!

非无偿解决问题! postmessage(句柄,WM_NCRBUTTONDOWN,0,0); 但不是我要的效果，当使用鼠标右键点住任何应用程序时，程序都会停止运行 我发送按住窗口右键的消息程序照样运行，没有出现鼠标按下的效果 该如何作到呢？ 下面的一个附件是别人给我做的一个演示程序，谁能告诉我他是如何做到呢! http://www.kb11.com/test.rar

以下是我的代码，并不算很长，应该也是写得很清楚的了。代码后面有文字说明 以下是DLL的代码 library dll; uses SysUtils, Windows, Classes, Dialogs, APIHook in 'APIHook.pas'; var Hook:HHOOK; function GetMsgProc(nCode:Integer;wParam:wParam;lParam:lParam):LRESULT;stdcall; begin Result := 0; end; procedure SetHook; begin H...

本地文件夹共享，急急急!! 在线等，最好有例子 好像NetShareAdd可以做，可是好像都不对!

function waitrun(app:pansichar):cardinal; var si:startupinfo; pi:process_information; begin fillchar(si,sizeof(si),0); fillchar(pi,sizeof(pi),0); si.cb:=sizeof(si); si.dwFlags:=startf_useshowwindow; si.wShowWindow:=sw_hide; createprocess(nil,app,nil,nil,false,normal_priority_class,nil,nil,...

程序已经最小化，并且不是当前窗口， 如何使用快捷键，将他显示在当前窗口前面

这个是什么问题? spfunction2: array[0..63] of Integer = (-$7FEF7FE0, -$7FFF8000, $8000, $108020, $100000, $20, -$7FEFFFE0, -$7FFF7FE0, -$7FFFFFE0, -$7FEF7FE0, -$7FEF8000, -$80000000我定义常量到这里就报错了

如何获得 outlook 的发件人地址 在OutlookApplication1ItemSend 的时候

有人能推荐几本书吗?最好和DELPHI有联系的,我看到一些相关的书 都和VC牵扯关系

procedure TForm1.Button1Click(Sender: TObject); var x: integer ; p: ^integer ; begin new(p) ; x := 10 ; p^ := x ; // 指针内存地址与x 不一致 p := @x ; // 指针内存地址与x 对致 //如果有 p:=@x ，Dispose(p)会提示错误的指针操作 Dispose(p); end; 是不是指针都用在 Record 记录中？ 关于指针的内存分配释放有哪些注意事项？...

在桌面上单独运行这个程序，也只是能用鼠标点击该按纽才有反应，不支持快捷键操作，这种情况下还能控制它的吗？

请问那里有串口控件spcomm.ocx下载

如：我要把\\dfqt\新建文件夹\date 复制到我的d:\ 应该在DELPHI中怎么实现？谢谢指教!

我是经过反复试验确认这一点的，如果正常安装的软件用waitforinput来等其运行结束，可是那些经过修改过的绿软就不能用这个办法，程序不等运行结束就直接进行下面的代码，可能是绿软因内部信息改变了所以不能提供正确的反馈信息给主程序吧，可是就没有办法处理这种情况下的启动结束判断吧？

RT。 另外，假如有多个CPU，是不是使用多个线程计算可以节省时间？比如两个CPU，各开一个线程处理图像的一半。

客户端用一个MODEM进行拨号连接服务器端，我在客户端进行拨号前肯定需要把这个MODEM在设备管理器中安装好驱动，那么MODEM连接的串口COM1就会被这个MODEM占用了，但是我又想打开COM1进行时时监听是否又人拨打客户端的电话，我的拨号用的时API函数实现的，不是用AT命令，所以客户端MODEM必须要安装驱动，要不然拨号时救不能识别MODEM，救拨不起号了，怎么解决这个串口之间的问题？？？？？？？？ 紧急，在此先谢谢大侠给予小妹帮助

本人写了一个dll文件要通过exe程序要加到iis筛选器里面，有朋友指点下如何操作不？ 谢! 先停止iis--》加载dll到iis筛选器--》启动iis

用DevC++写了一个dll，用Delphi调用.第一次点击Button1时，运行正常，第二次再点击时，就出现了自己定义的错误信息，MessageDlg('Can not load ReadPath.dll!',mtError,[mbOK],0); 释放完后句柄就变成空了，第二次装载dll时就不行了。 哪位能告诉我是什么原因。。 procedure TForm1.Button1Click(Sender: TObject); type RunDLLForm=function():PChar;stdcall; var handle:THandle; proc:T...

我最近在做一套机房管理系统．我客户端做一个系统低层登陆的界面．就是在进xp的操作系统前的登陆界面（窗体）．热心的朋友给出提示．最好是有代码～～～～～～整个软件就只这个功能了．对了要考虑进安全模式的情况．

delphi怎么从.cel,.prt文件读出和写入数据,很着急,大家帮帮忙吧

{* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * Author: Benny Feng (Sanmaotuo) Created: December 2006 Version: 1.01Beta Notes: CPU Usage Warning Thread For Codefund References: [1] CPU Usage Measurement routines for Delphi and C++ Builder By Alexey A. Dynnikov...

我的目的是要得到局域网内所有计算机的名称，然后显示在列表筐内，点击即可实现局域网内计算机的控制!!希望高手帮忙，谢了!!

ocx文件，如何在 不注册的情况下动态调用(不用regsvr32 *.ocx)或(不用regsvr32 *.dll),当然是在知道ocx文件的函数和guid情况下 qq的动画插入就是这样，不用注册ImageOle.dll，可直接用，有谁知道

ShellExecute可以根据文件后缀调用关联程序执行文件. 我现在的问题是我必须把某个exe文件的后缀改成dat,然后使用ShellExecute来执行这个程序,但是它直接把这个可执行文件当作媒体文件来执行了. ShellExecute(Handle, nil, PChar('.\Client.dat'), nil, nil, SW_SHOW); 就像上面这样Client.dat实际上是个可执行文件,我怎么才能在不修改后缀的前提下叫ShellExecute把这个Client.dat当然可执行来执行呢?

多謝了!

當我用程序 if not EnableMouseHook(handle, GetCurrentProcessID,Application.Handle) then ShowMessage('ERROR') else SetCaptureFlag(TRUE); 當系統是win98+delphi6時,調用 GFDict.DLL中的 EnableMouseHook 函數時總是通不過, 問題就是在RegisterClass這裡,但是在系統是winXP+delphi6的時候就可以通過,不知是何原因?? GFDict.DLL 部分代碼如下: function Enabl...

我的delphi代码如下，愿意帮忙的朋友留下E-mail或QQ，我给发过去。先谢谢了。 我的E-mail：forcal@sina.com ，QQ：630715621 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type Doubuf=array of double; //动态调用动态库的函数类型声明 fcInitForcal=function:boolean ; stdcall;...

如题，我做了控件要有滚动条，但是ScrollBox里要放panel。在panel上进行鼠标滚轮操作都被panel给截了，ScrollBox得不到消息，请问怎么再发给panel

怎么将十六进制转换为十进制

我曾用以下方法调用 dll 中的函数，程序可以运行： PFunc: TFarProc; ... OneHandle := LoadLibrary('test.dll'); //动态载入DLL，并返回其句柄 Pfunc := TFarProc(GetProcAddress(Onehandle,'Instr')); Pfunc('hello !'); 后来看到好像这是正规用法（还没用）： PFunc: TFarProc; ... OneHandle := LoadLibrary('test.dll')...

请问：我现在想在explorer.exe进程里创建一个线程，该怎么做？需要用到dll和文件映射之类的么，请给出核心的代码，谢谢

300分求解!!IE工具栏的编程锁定、占一行、菜单中去除问题求助! 我写了一个IE工具栏，已可以正常运行，现在我想实现以下功能： 1、IE打开时如果自动锁定 2、工具栏自动占一行 3、右键点击IE工具栏出现的菜单中不显示我的工具栏名字 由于一贴只能给100分，每解决一个问题我另开贴给分

因为编程中要使用到tshell类型，所以先要引入shell32.dll,使用component-Import ActiveX Control 再选择 Microsoft Shell Controls and Aotumation(Version 1.0) ,再选择Install ,最后一步，Install按钮为灰色， 不能正常，请指教，使用的版本为delphi6

例如调用的dll名为test.dll 内有c函数原型 extern void GenMedMac(char *, char *)（第一个参数为传入值，第二个参数返回值） 问：在delphi中如何声明，如何静态调用？

TSharedMemory = packed record Int1: Integer; Str1: String[255]; Str2: array [0..255] of Char; Str3: WideString; Obj: TMyObject; end; PSharedMemory = ^TSharedMemory; 使用中发现，对Str3也就是 WideString操作时会出错，对Obj也是， 难道共享内存只能用最原子的数据类型而且数据长度是固定的?如何把任意对象放到共享内存中共享？...

小弟菜鸟，也想装摸做样的用GetExceptionCode处理异常，可是编译出错，说是Undeclared identifier，不知是不是在uses里面要加什么？谢谢诸位了~~~ ps：GetExceptionCode已经放在except...end之间，就是exception handler block里面了

请问一下超市防盗是如何作到的，买过的商品，像好又多和沃尔玛那样，收营员对买过的商品都作了一个刷商品的操作。 我想按理说，是不是没经过那机器刷过的商品直接拿出去就会报警了呢？ 我听说他们是通过在每个商品上加了磁条来实现的，请问他们具体是怎么作的啊？ 有没兄弟帮偶回答一下，谢谢啦

调用C的dll文件：其函数为： DWORD VPI_Reg(char *IPstr, WORD Port) 我在delphi中定义为： function VPI_Reg(var IPstr:pchar;var Port:word):DWORD;stdcall;external 'VPIClientDll.dll'; 调用如下： var port:word; ipadd:string; ip:pchar; res:dword; begin ipadd:='127.0.0.1'; port := 2003; ip:=pchar(ip...

现在有一已经在使用中的ActiveX组件(VC编写） 接口声明了20多个方法，实际使用中有四五个 现要求增加功能，但原来的ActiveX没有了源代码 能否用Delphi，或VB或VC重写这个ActiveX并保持与原组件兼容即已经在使用应用不需再改写 如果可以，需要注意哪些东东呢？ 1.组件文件名需不需要相同？ 2.组件类名需不需要相同？ 3.ClassID 及一系列接口的ClassID需不需要相同？ 4.dispid需不需要完全相同？ 5.方法与属性在接口中的顺序与数量需不需要相同？(因为有些没使用到的也要做出来？) 感觉要是都要相同的话有点点烦 我现在是用Delphi在...

请问,在delphi中如何调用autocad

如题了。分不多~ 希望有人解答。