求助一个库文件的函数 ( 积分: 50 )

孤

孤云

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-14

• #1

在VB中有这样的一个：<br>Private Declare Function GetUserName Lib &quot;advapi32.dll&quot; Alias &quot;GetUserNameA&quot; (ByVal lpbuffer As String, nSize As Long) As Long<br><br>advapi32.dll 是 windows 的库文件<br>GetUserNameA 是这个库文件中已经做好的固有的函数名<br>GetUserName 是在 VB Project 要使用的函数<br>请问在delphi中应该怎么编写？<br>那位高手帮帮我！！！

 

孤

孤云

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-14

• #2

在VB中有这样的一个：<br>Private Declare Function GetUserName Lib &quot;advapi32.dll&quot; Alias &quot;GetUserNameA&quot; (ByVal lpbuffer As String, nSize As Long) As Long<br><br>advapi32.dll 是 windows 的库文件<br>GetUserNameA 是这个库文件中已经做好的固有的函数名<br>GetUserName 是在 VB Project 要使用的函数<br>请问在delphi中应该怎么编写？<br>那位高手帮帮我！！！

 

T

TYZhang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-14

• #3

function GetUserNameA(lpbufferchar;nSize:integer):integer; external 'advapi32.dll';

 

孤

孤云

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-14

• #4

请问Delphi也有这个库文件吗？需要定义接口吗？<br>它的库文件和函数都有哪些啊？<br>谢谢！

 

R

robinhanhui

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-14

• #5

这个函数是直接调用windows api了<br>不是delphi本身的函数,主要功能是取得当前进程用户名<br>delphi里面好象没有这种功能的类似函数

 

A

abookdog

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-14

• #6

function GetUserNameA(lpbufferchar;nSize:integer):integer; safecall;external 'advapi32.dll';

 

孤

孤云

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-14

• #7

再问一ge个，那么<br>Private Declare Function OSWinHelp% Lib &quot;user32&quot; Alias &quot;WinHelpA&quot; (ByVal hwnd&amp;, ByVal HelpFile$, ByVal wCommand%, dwData As Any)<br>用delphi怎么办，确实不会举一反三[!][!]

 

孤

孤云

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-14

• #8

Function WinHelpA(hwnd&amp;,HelpFile$,wCommand%,dwData:Variant);<br>safecall;external 'user32<br>行吗？'

 

孤

孤云

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-21

• #9

多人接受答案了。