Показать сообщение отдельно
  #1  
Старый 30.11.2008, 13:40
ApplicatiOn ApplicatiOn вне форума
Активный
 
Регистрация: 28.02.2008
Сообщения: 388
Репутация: -10
По умолчанию Строки ComboBox

Код:
procedure TForm1.FormCreate(Sender: TObject);
var
f: textfile;
tmp : string;
i: integer;

begin
AssignFile(f, 'file.ttt');
Reset(f);
for i:= 0 to combobox1.Items.Count - 1 do
begin
readln(f, tmp);
combobox1.Items[i] := tmp;
end;
closefile(f);
end;

мне нужно выгрузить строки из файла в combo box..

В файле содержатся строки (100%), но при запуске программы, они не выгружаются в комбо бокс, а просто удаляются из текстового файла..

подскажите, в чем моя неправда в коде?

делал даже так:

combobox1.Items.Add(tmp);

всеравно не хочет...
Ответить с цитированием