怎样取得当前计算机的名称?急用 varComputerName:pCHAR;SIZE:DwORd;begin size:=10; GetCOmputerName(ComputerName,SIZE);end; 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 getmem(p,sizeof(p);用这个函数就行getusername var p:pchar; i:dword;begin if (sender is tflatbutton) then begin getmem(p,200); i:=200; getusername(p,i); showmessage(strpas(p)); end;end; 新手要做B/S结构的管理系统,请大家给点建议 关于imp\exp? Delphi 大小写比较预编译反指令是什么? 制作帮助文件 hiflower(花)请进!! 我的程序发布了,可是却不好用,怎么办? 如何手动给dbgrid某一列负值 ? 选中控件,按ctrl+c,ctrl+v,怎样复制出相同的控件出来,就象是在设计的时候一样。up有分,谢谢 请教SQL Server 2000执行速度的问题 delphi和vb学哪个好? 又一個DBNavigator控件問題,再給您加分。 简单问题,白给分!
用这个函数就行getusername
p:pchar;
i:dword;
begin
if (sender is tflatbutton) then
begin
getmem(p,200);
i:=200;
getusername(p,i);
showmessage(strpas(p));
end;
end;