Сообщество IT-специалистов
Ответы на любые вопросы об IT
Профессиональное развитие в IT
Удаленная работа для IT-специалистов
BatchingEdit.Text := copy(p^.gr.Batching, 1, length(p^.gr.Batching)-3);
LChars:= LChars + Stroka[i];
Include(LChars, Stroka[i]);
LChars:= LChars + [Stroka[i]];