Код:
type TMyStr = record
str: array of string;
count: integer
end;
var
MyStr: TMyStr;
я заранее не знаю какой размерности будет массив строк, поэтому я каждый раз при добавлении элементов задаю ему длину setlength
Код:
setlength(mystr,1);
MyStr[0].str:= 'xexe';
MyStr[0].count:=1;
Это не удобно.
Как сделать чтобы был метод, как например у
Tstrings add(string) ?
чтобы я мог пользоваться такой конструкцией
MyStr.add('xexe');
и метод
Add сам увеличивает размерность массива на 1, вносит в последний элемент строку "xexe" и увеличивает счетчик на 1.