Funciones del server:
procedure Print(Text: AnsiString);//Escribe texto en la sala.
procedure PrintV(Vroom: Integer; Text: AnsiString);//Escribe texto en un solo Vroom.
procedure PrintU( us: TUser; Text: AnsiString);//Envia texto solo a un usuario.
function User(Name: AnsiString): TUser;//Devuelve un objeto TUser, para trabajar con un usuario.
function BUser(index: Integer): TBUser;//Devuelve un objeto TBuser, con datos de un usuario baneado.
procedure ClearbanList;
function CharLength(strUTF8: AnsiString; index: Integer): Integer;//Devuelve la longitud de un caracter.
function Random(const ARange: Integer): Integer;
procedure LocalUsers(proc: Tuserproc);//Hace una retrollamada al prodedimiento "proc" por cada usuario.
procedure BanUsers(proc: TBuserproc);//Hace una retrollamada al prodedimiento "proc" por cada usuario baneado.
function EncodeBase64(const Value: AnsiString): AnsiString;
function DecodeBase64(const Value: string): string;
function Sha1Hash(txt: AnsiString): AnsiString;
function LoadImage(filename: AnsiString): TBitmap; //Carga fornmatos: jpg, png, gif y bmp.