![]() |
|
#1
|
||||
|
||||
![]() есть несколько нубоватых вопросов.
1. Как создать новый экземпляр для record'а, ну то есть есть переменная Р и в цикле для этой перменой должен создаваться новый экземпляр и добавляться в TList (ну или массив), New, GetMem или ещё что надо использовать? 2. Программа активно работает с большими текстами, все они хранятся в string переменных, из-за этого происходят утечки. Вопрос, как освободить память используемой строкой? TAleD = class(TUser) public function HelpMe(ASubject, ARequest: String): String; function GiveMeExample(ASubject: String): TStringList; procedure WriteReview(APost: Integer; ADescription: TStringList); end; |