И чо же ты собираешся зашароварить? скажу те лишь одно: если ты это дело делаешь на ломаной делфи то могут быть к тебе претензии... но это я так для заметки. Ключ только к харду привязывается или ещё к какому-нибудь железу (исходник влом качать)?
__________________
TAleD = class(TUser)
public
function HelpMe(ASubject, ARequest: String): String;
function GiveMeExample(ASubject: String): TStringList;
procedure WriteReview(APost: Integer; ADescription: TStringList);
end;
|