[xxx00xxx]

Суть такова

есть 2 значения

var
i:integer;
b:integer;

i:=1;
b:=1;


begin
buf:=#$XX;
WriteS('текст if i=100 +inttostr(b))тут продолжения текста'+inttostr(i))
SendToServer;
inc(i);
inc(b);

суть такова нужно что бы значение b в середине текста прибавлялось на +1 и каждое сотое значение i которое в конце строки текста сбрасывалось снова на 1.

пример
текст1текст1,2,3,4,5,..
текст1текст100
текст2текст1...

И возможно ли это ?

не могу собразить как это реализировать . Как правильно создать эти переменные и как считать это значение .