如何声明如下函数

[botnet]

[Error] Client.dpr(53): Undeclared identifier: 'GetPcName'
[Error] Client.dpr(54): Undeclared identifier: 'ReadRegInt'
[Error] Client.dpr(55): Undeclared identifier: 'ReadRegStr'
[Error] Client.dpr(55): Incompatible types
[Error] Client.dpr(106): Undeclared identifier: 'FloatToStr'
[Error] Client.dpr(106): Incompatible types
[Error] Client.dpr(131): Undeclared identifier: 'IntToFmFloat'
[Error] Client.dpr(244): Undeclared identifier: 'Split'
[Error] Client.dpr(274): Undeclared identifier: 'KillProcessByPID'
[Error] Client.dpr(347): Undeclared identifier: 'GetPcName'
DELPHI问题
这些函数好象不在SHELLAPI里，如果不在怎么声明呢，不会是我得把原形搞出来吧

[stherix]

'FloatToStr' sysutils里面的

[stherix]

其他的都是别人自定义的

[sanguomi]

按住CTRL + DELPHI提示你没有定义的,然后就会出现一个单元,把这些单元加到USES里去

[stherix]

3楼的
只有uses引用的单元
才会有ctrl+出来定义

[botnet]

我试过。提示找不到.dcu文件。

[botnet]

[Fatal Error] Client.dpr(4): File not found: 'GetPcName.dcu'

[delphilaoda]

function GetComputerName:string;
var
wVersionRequested : WORD;
wsaData : TWSAData;
p : PHostEnt; s : array[0..128] of char;
begin
try
wVersionRequested := MAKEWORD(1, 1); //创建 WinSock
WSAStartup(wVersionRequested, wsaData); //创建 WinSock
GetHostName(@s,128);
p:=GetHostByName(@s);
Result:=p^.h_Name;
finally
WSACleanup; //释放 WinSock
end;
end;

这个delphi中没有

[delphilaoda]

也就是得到远程机器的名称

[delphilaoda]

其他的看看TYPES

[botnet]

TYPES是什么啊。

[knowledge_Is_Life]

接分先！