Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как из строковой переменой посимвольно считать в массив типа real [D7, WinXP]

RiP © (2005-09-21 20:57:00)
Помогите пожалуйста
Как из строковой переменой посимвольно считать в массив типа real числа
Вот так что то не получается
for i:=1 to 10 do
A[i]:= strtofloat(s); здесь он мне 10 раз одну и ту же строку в каждый элемент засовывает а мне нужно каждое число в каждый элемент массива запихать

SergP. (2005-09-22 11:50:00) [1]

> посимвольно

А зачем тогда real?

Zeqfreed (2005-09-21 21:33:00) [2]
RiP (21.09.05 20:57)

> Как из строковой переменой посимвольносчитать в
> массив типа real числа

for i := 1 to length(Str) do if (Str[i] in ['0'..'9']) then A[i] := StrToFloat(Str[i]);

Это как вариант интерпретации вопроса, ещё если учесть [3].

Adder (2005-09-21 21:16:00) [3]

> RiP (21.09.05 21:13) [3]

И чем же они разделены? Как Вы различаете, где заканчивается первое число и начинается второе?

RiP (2005-09-21 21:13:00) [4]
они не разделены пробелами

PAVIA (2005-09-21 21:11:00) [5]
Допустим у тебя числа разделены пробелами.
s:=s+' '; for i:=1 to 10 do begin A[i]:= strtofloat(copy(s,1,pos(' ',s)-1);); //берем первое число в строке delete(s,1,pos(' ',s)); //Удаляем его из строки вместе с пробелом end;

AlexWlad (2005-09-21 21:08:00) [6]
А внутри цикла значение переменной S Пушкин будет менять???

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »