[Помогите!] добавление текста edit1.2

[-=ShoN=-]

У меня такстовик с таким содержанием

ник   пароль
ник  пароль
ник   пароль

и т.д.
надо чтобы ник добавлялся в edit1
а пароль в edit2
как реализовать, хелп)
разделители меж ником и паролем пробелы.....

[doctor_flasher]

берешь n строку файла, читаешь все до разделителя (лучше используй какой-нибудь знак вместо пробелов. например: |) - это ник. Читаешь все от разделителя до конца строки - это пароль.

В общем, на объяснения всем насрать да. Вот код:

procedure TForm1.Button1Click(Sender: TObject);
var
lines: TStringList;
begin
lines := TSTringList.Create();
lines.LoadFromFile('test.txt');
Edit1.Text := copy(lines[1], 0, pos('|', lines[1]) - 1);
Edit2.Text := copy(lines[1], pos('|', lines[1]) + 1, length(lines[1]));
lines.Free();
end;

Надо - стучи в аську: 5пять30пять8742