2Bargest
Да, вы правы, невнимательность и копипаст. Там разные команды, т.е.:
com1:=edit1.Text;
com2:=edit2.Text;
com3:=edit3.Text;
com4:=edit4.Text;
com5:=edit5.Text;
2Alegun
Виноват, ввел в заблуждение не правильно задав вопрос. На самом деле сделдано сейчас именно таким образом:
Код:
com1:=edit1.Text;
com2:=edit2.Text;
com3:=edit3.Text;
com4:=edit4.Text;
com5:=edit5.Text;
for i:=1 to length(com1) do idtelnet1.sendch(com1[i]);
for i:=1 to length(com2) do idtelnet1.sendch(com2[i]);
for i:=1 to length(com3) do idtelnet1.sendch(com3[i]);
for i:=1 to length(com4) do idtelnet1.sendch(com4[i]);
for i:=1 to length(com5) do idtelnet1.sendch(com5[i]);
и хотел все это сократить так:
Код:
for j:=1 to 5 do begin
for i:=1 to length(com[j]) do idtelnet1.sendch(com[j,i]);
И команд на самом деле, в зависимости от условии, от 1 до 17, не сказать что прям текст такой большой получается, но все же хотелось как то красиво сделать.