Новый участник
Сообщения: 40
Благодарности: 1
|
Профиль
|
Отправить PM
| Цитировать
То что вы написали я не понял. Но нашел другой способ своими ручками.
Var
Str1, Str2: String;
begin
sMemo1.Lines.LoadFromFile('C:\Program Files\File.txt');
Str1:='Str-Width: 360';
Str2:=Copy(Str1, 12, 3); - 12 начинаем копировать. 3 копируем 3 цифры.
sEdit1.Text := Str2;
|
-------
Кругом обман - уйду в туман.
Отправлено: 06:19, 25-10-2010
| #3
|