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