06.11.2016, 22:30
|
 |
LMD-DML
|
|
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
|
|
Цитата:
|
Сообщение от hide77
...как подставить copy(s,1,2) и т.д. все время несоответсвие типов...
|
Integer на выходе
Код:
Data_r[0]:= StrToInt('$' + copy(s,1,2)); |