Listbox+files.txt+memo

Posted by Denis on November 15, 2000 at 14:02:18:

I have this kind of problem:
in my applicationt I have ListBox and Memo, In list box I have more then 200 objeects. And i have a derrictory called 'PAS' that contains 200 text files. Now I want when I klick on one of the items in listbox the particular file in /pas dir is inserted in memo object...

I tried to write command like this
procedure TForm1.ListBox1DblClick(Sender: TObject);
begin
if ListBox.Items = 'dfsdfsd' then
......
....
...else if Listbox.Items = 'fgdfgdfg' then
.....
.....

but it's just inposiblle to write thise way it wiil take a day or two for me :(.

So if there any kind of shortcat?

any help will be aprisiated.