下面图老师小编跟大家分享一个简单易学的XP/2003下开放3389最简单的方法教程，get新技能是需要行动的，喜欢的朋友赶紧收藏起来学习下吧！
【 tulaoshi.com - 编程语言 】
记得很久以前在黑基上看过的了，就修改注册表一个键值而已。
前几天翻了下旧文章，才想起有这个方法。呵呵，把它做成个小程序吧，免得老忘了。
program Open3389;
{$APPTYPE CONSOLE}
（本文来源于图老师网站，更多请访问http://www.tulaoshi.com/bianchengyuyan/） uses
SysUtils, Registry, Windows;
var
reg:TRegistry;
procedure Help;
begin
writeln('');
writeln('======Win XP&2003 Open3389 by lanyu====== ');
Writeln('Useag '+ExtractFileName(Paramstr(0))+' [/n]');
end;
begin
{ TODO -oUser -cConsole Main : Insert code here }
if ParamCount2 then
begin
help;
exit;
end;
reg:=TRegistry.Create;
reg.RootKey:=HKEY_LOCAL_MACHINE;
reg.OpenKey('SYSTEMCurrentControlSetControlTerminal Server',true);
if ParamCount=1 then
begin
if Paramstr(1)='/n' then
begin
try
reg.WriteBool('fDenyTSConnections',true);
Writeln('Close 3389 successfully');
except
Writeln('Close 3389 fail');
end;
end
else
begin
Help;
Exit;
end;
end
else
begin
try
reg.WriteBool('fDenyTSConnections',false);
writeln('Open 3389 successfully');
except
writeln('Open 3389 fail');
end;
end;
reg.Free;
end.
（本文来源于图老师网站，更多请访问http://www.tulaoshi.com/bianchengyuyan/）
来源:http://www.tulaoshi.com/n/20160219/1624510.html
看过《XP/2003下开放3389最简单的方法》的人还看了以下文章 更多>>
