работа с файлами!

[vakyla]

Добрый день
не подскажите пожалуйста
такая вот проблема хочу в
case radiogroup1.ItemIndex of
0:z:=;
1:z:=;
2:z:=;
3:z:=;
end;
Чтоб из файла построчно загружалась инфа в эти радиогрупп!
у меня в файле 4 строки и надо чтоб каждая строка загружалась в свою строку радиогруппы!z:=какойто инфе первой строки из файла и так далее!

[Utkin]

Загрузи их в Мемо (пусть он будет невидимым), а оттуда уже выбирай в радиогрупп.

[vakyla]

ну в мемо смогу загрузить а как их из мемо в радио групп сделать не доконца понимаю

[raxp]

radiogroup.items[i]:= memo1.lines[i]

смысл ясен?

[vakyla]

вроде работает спасибо!

а как мне можно сравнивать тексты один котрый находится в радиогруппе а другой в окне мемо???

подскажите как сравнить 2 текста ?я думаю через if но у меня не получается?

if memo2.Lines[1]=memo1.lines[7] then
   label4.Caption:='ПРАВИЛЬНО'
  else   label4.Caption:='НЕПРАВИЛЬНО'

[Xatr]

Может проверять каждый символ строки? Например:

var a,b:string;
c,d:integer;
begin
a:=Memo1.Lines.Strings[1];
b:=Memo2.Lines.Strings[7];
if length(a)=length(b) then  //проверка одинакового размера строк
for c:=1 to length(a) do
if a[1]=a[2] then d:=d+1 else begin
break;
ShowMessage('Не равны');
end;
if d=length(a) then showmessage('равны');
end;

[vakyla]

кажется все работает!
спасибо!
А у меня еще один вопрос а если мне надо в мемо записать ни одну строку а с 1 по 3 то как надо указывать?
[1,3] так у меня не получается?

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

[Пепел Феникса]

memo1.Lines.add(<строка>);
добавляет строку в мемо( а сколько решайте сами)

[raxp]

memo.lines.add()

[vakyla]

все получилось нашел ошибку!
всем спасибо!

А у меня еще один вопрос а если мне надо в мемо записать ни одну строку а с 1 по 3 то как надо указывать?
[1,3] так у меня не получается?