Вопрос про Memo

[Coobik]

Нужна помощь, можно и ссылку.
В общем, есть код.

Data.Add('AuthForm[loginOrEmail]='loginOrEmail);
    Data.Add('AuthForm[password]='password);

Нужно сделать чтобы программа брала данные из Memo, в таком стиле

loginoremailassword

":" - разделитель.
Как сделать чтоб программа брала из мемо данные и вставляла в AuthForm[loginOrEmail] и AuthForm[password] ?

[DIgorevich]

pos copy еще никто не отменял...

[lux16]

Хм, решение простое: с помощью TStringList и разделение на слова

[Coobik]

На счёт разделения вопрос решил.

Теперь пара других вопросов.
Каким образом сделать цикл, т.е. действие кончается, и нужно удалить строку из memo и начать работу со следующей ?

t := TStringList.create;
t.text := stringReplace(Memo1.Lines[0], ':', #13#10, [rfReplaceAll]);
...
Data.Add('AuthForm[loginOrEmail]='+t[0]);
Data.Add('AuthForm[password]='+t[1]);

С делфи ещё "близко" не дружу, поэтому и прошу помощи.