谁会把VB的变量转成DELPHI的变量啊! 如:StringLongIntegerDoubleCurrencyBoolean 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 定义时对比如下,前为VB,后为DelphiString -- CharLong -- LongintInteger --IntegerDouble -- Double Currency -- CurrencyBoolean --Boolean Delphi里Char是字符,字符串也是String 噢,Sorry !viena(晓琴)说的对,我写错了一个 library MyModule;uses Windows,Messages;function MouseTxt():char;stdcall;var Pos: TPoint; Handle: HWND; Buf: array[0..1024] of Char;begin GetCursorPos(Pos); Handle := WindowFromPoint(Pos); SendMessage(Handle, WM_GETTEXT, 1024, Integer(@Buf)); result := Buf;end;exports MouseTxt;beginend.VB怎么调用? RichText为什么不能写汉字?(急!!!) 请教对日期的查询 关于VB读写SQL数据库的问题!!!! 如何点击Word 的保存或打开执行我的保存和打开功能的呢。 向高手求助!!一个小问题~~ vb区的兄弟们,累了的话来轻松一下,看一个有趣的东西^^ 谁能提供这个远程数据库连接成功的代码,再送100分,绝不食言! 很急:一个非常郁闷无比的问题,关于窗体的ShowModal显示方式问题 高手们都进来关注一下!解决立即给分。 EXCEL VBA 关于Workspaces(0)的基础问题 数据库查询中如果用DAO,怎么样设计才能实现模糊查询和多从查询
Windows,Messages;function MouseTxt():char;stdcall;
var
Pos: TPoint;
Handle: HWND;
Buf: array[0..1024] of Char;
begin
GetCursorPos(Pos);
Handle := WindowFromPoint(Pos);
SendMessage(Handle, WM_GETTEXT, 1024, Integer(@Buf));
result := Buf;
end;
exports
MouseTxt;
begin
end.VB怎么调用?