Не присваивает значение третьей переменной

[Corpuscul]

тогда можно так:
Код:

a:= StrToFloat(words[0]) ;
b:= StrToFloat( words[1] ) ;
c:= StrToFloat( words[2] ) ;

А вот так мы и вернемся к названию темы
Я так уже делал

procedure TForm1.btn1Click(Sender: TObject);
 var words: TStringList; a, b, c: Double;
begin
    words:= TStringList.Create;
  SplitTextIntoWords(edt1.Text,words);
  a:= StrToFloat(words.Strings [0]);
  b:= StrToFloat(words.Strings [1]);
  c:= StrToFloat(words.Strings [2]);
  mmo3.Text:= words.Text;
  words.Free;
  tolshina(a);

    end;

Что мешает объявить в качестве глобальной переменной какой-нибудь TempStringLisT: TStringList и создавать его по TForm.Create или TForm.OnShow?

Если можете расскажите подробнее пожалуйста, ведь в TempStringLisT записываются списки, а мне из одного списка надо вытащить три переменные

[Sciv]

var words: TStringList;

Вот же у Вас используется точно такой же список. Объявите такой же (или этот перенесите) глобальным (то есть в разделе Uses модуля формы либо в разделе public класса и пользуйтесь одним стринглистом во всей программе (в том числе и в других модулях при необходимости).

[Serge_Bliznykov]

ну и? посмотрел я выложенный вами проект.
Запустил Project1.exe.
ввёл в поле под "Габаритные размеры детали"
12 344 57
нажал кнопку "ОК"
получил внизу в Memo:
12
344
57

Что не так то?..

SplitTextIntoWords(edt1.Text,words);

А что у Вас в переменной edt1.Text ?

[Новичок!]

Сообщение от Corpuscul

Я так уже делал

и что при этом происходит?

[Corpuscul]

Всем спасибо за помощь, разобрался! Новичок! был прав, третья переменная появилась и я подозреваю, что она присваивалась надо было лучше читать про поля мемо..

ну и? посмотрел я выложенный вами проект.
Запустил Project1.exe.
ввёл в поле под "Габаритные размеры детали"
12 344 57
нажал кнопку "ОК"
получил внизу в Memo:
12
344
57

Что не так то?..

долго объяснять, в общем-то такая же проблема как и тут http://programmersforum.ru/showthread.php?t=169534

Цитата:
Код:


SplitTextIntoWords(edt1.Text,words) ;

А что у Вас в переменной edt1.Text ?

Не знаю, содрал с сайта одного рабочую версию разбиения текста и переделал под себя