Добрый всем вечер.
Есто такой вопрос. Получаю данные примерно в таком виде "#RID,OUT,0101000000000000000000". Я принимаю таким образом (сделал для примера).
Код:
1 2 3 4 5 6 7 8 9 10 | var n : String ;
m : integer ;
begin
n := edit5 . Text;
m := pos( ',' ,n);
Edit6 . Text := copy(n, 0 ,m- 1 );
n := copy(n,m+ 1 ,length(n));
m := pos( ',' ,n);
Edit7 . Text := copy(n, 0 ,m- 1 );
Edit8 . Text := copy(n,m+ 1 ,length(n));
|
В Edit5 у меня "#RID,OUT,0101000000000000000000", соответсвенно в Edit6 я получаю "#RID", в Edit7 - "OUT", в Edit8 - "0101000000000000000000". А мне нужно в Edit8 - "0", в Edit9 - "1", в Edit10 - "0". То есть взять для каждого Edit8,9,10 первый, второй, третий знак после запятой. Скрин прилогается. Подскажите как правильно взять данные?
