Вопрос по задаче Delphi

[Vla9240]

В задаче есть пункт меню "поиск слова".Текстовый файл считан в окно Memo и слово которое нужно найти в этом файле выводится в окно Edit, которое в свою очередь выбирается в ComboBox. Мне сделали замечание а как слова попали в ComboBox. У вас нет действия со строками этого компонента.
Я что-то не пойму ведь слова записываются в ComboBox в момент создания программы и в коде этого невидно. И какие действия должны быть со строками компонента? Может кто нибудь объяснит?

procedure TForm1.N3Click(Sender: TObject); //поиск слова
var i, n: integer;
    s: string;

begin
     Edit1.Text:=ComboBox1.Text;  // а как слова попали в ComboBox.
     //У вас нет действия со строками этого компонента
     i:=0;
     s:=Memo1.Lines.Text;
     n:=Pos(Edit1.Text, s);
     while n>0 do
      begin
        i:=i+1;
        Delete(s, n, Length(Edit1.Text));
        n:=Pos(edit1.Text, s);
      end;
      StatusBar1.Panels.Items[1].Text:='Count ='+ IntToStr(i);

end;

[Sazary]

Я что-то не пойму ведь слова записываются в ComboBox в момент создания программы и в коде этого невидно. И какие действия должны быть со строками компонента?

Замечание действительно какое-то некорректное. Может, от вас хотят, чтобы вы заполнили комбобокс словами уже во время выполнения?
Например, можно в OnShow формы забить туда несколько слов.

Кстати, а зачем вам читать слово из Combobox'а? Ведь поиск слова подразумевает поиск любого слова. То есть работайте с TEdit'ом.

[Stilet]

ведь слова записываются в ComboBox в момент создания программы и в коде этого невидно

Ну так распечатай преподу скрин где показаны в дизайнере содержимое Комбика

Ведь поиск слова подразумевает поиск любого слова

Не всегда, как ни удивительно бывают и обратные ситуации )