Цитата:
Сообщение от RangerX
ну в итоге код принимает вид:
Код:
var
s:string;
//................
s := ReadS(6);
s := copy(s,11,5);
s := Copy(s, 1, Pos(' ', s) - 1);
Edit1.Text := s;
|
у тебя есть аська?)
Добавлено через 1 час 56 минут
оп-оп, немного пошоманил заработало
__________________
Последний раз редактировалось dyh9l, 01.12.2010 в 18:11.
Причина: Добавлено сообщение
|