📄 generalinf.pas
字号:
unit GeneralInf;
interface
uses
ScktComp;
type
Ps=array of Pchar;
PPs=^Ps;
TUserInfo=Record
UserName:Pchar;
Logined:Pchar;
Sex:Pchar;
Handle:Pchar;
ID:Pchar;
end;
AUserInfo=array of TUserInfo;
PUserInfo=^AUserInfo;
function GetSession(Str:Pchar;Count:integer;separator:char=#255):PPs;stdcall;external 'General.dll';
//function GetUserInfo(AUserName,ALogined,ASex,AHandle,AID:Pchar):AUserInfo;stdcall;external 'General.dll';
implementation
end.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -