[NIch]

Попробуй так)))

Код:

procedure tform1.Loadclick(Sender: TObject);
begin
  if OpenDialog1.Execute then
    ListBox1.Items.LoadFromFile(OpenDialog1.FileName);
end;