本文整理自网络,侵删。
function GetComputerNetName: string;var buffer: array [0 .. 255] of char; size: dword;begin size := 256; if GetComputerName(buffer, size) then Result := buffer else Result := ''end;
相关阅读 >>
如何使用Delphi 10 seattle的android应用做intent的发送和接收
Delphi issameday、istoday - 判断是不是同一天、判断是不是今天
更多相关阅读请进入《Delphi》频道 >>