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