Вывод из файла рандом строку с разделителем.

[bad_patefa]

Здравствуйте.
Имеется на сайте файл, вида:
123;asd
789;xcv
741;klj
и т.д. тоесть разделитель- ;

необходимо рандомно получить строку и вывести
первую часть строки, до ; в поле edit1
вторую часть строки, после ; в поле edit2

Заранее спасибо.

[evg_m]

для получения списка строк используйте класс TstringList. и его методы LoadFrmFile LoadFromstream. Уточнить использование можно с помощью F1 + Delphi Example + See Also.
рандомный номер строки j:=random(coutstr)
разбор строки pos|posEx|copy ну и F1 c Delphi Example впридачу.
можно также поиск по сайту.

[bad_patefa]

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

для получения списка строк используйте класс TstringList. и его методы LoadFrmFile LoadFromstream. Уточнить использование можно с помощью F1 + Delphi Example + See Also.
рандомный номер строки j:=random(coutstr)
разбор строки pos|posEx|copy ну и F1 c Delphi Example впридачу.
можно также поиск по сайту.

пасиба, немного помог.
вобщем всё сделал... (рандом строку получал через скрипт php, благо его лучше знаю)) выводил в скрытый memo через idhttp и разделял ; кодом ниже)

a:= Memo3.Text;
a1:= Copy(a,1,Pos(';',a)-1);
Delete(a,1,Pos(',',a));
Edit1.Text:= a1;

вопрос закрыт