А в ListBox так можно ?

[digitalis]

В смысле при отсутствии файла в LoadFromFile иметь не системную, а пользовательскую реакцию, как при обычном вводе из файла?

 
      AssignFile (F2,strarg) ; // ! ! ! !
      {$I-}
       Reset (F2) ; ; NN := IOResult ;
      {$I+}
      if NN <> 0 then 
            ShowMessage (' Нет файла  ' + strarg) ;

[Alex11223]

Оно исключение кидает скорее всего, см. try except.

И для файлов тоже лучше TFileStream использовать, а не древние функции Паскаля.

[digitalis]

Я так смутно и подозревал, но с try except пока не пробовал.
А что до древностей Паскаля - так мы с ним оба древние

[Аватар]

  try
    ListBox.Items.LoadFromFile('имя файла');
  except
    on E: Exception do ShowMessage(E.Message);
    Exit;
  end;

[digitalis]

Thanks.