Показать сообщение отдельно
  #5  
Старый 16.12.2007, 02:14
Аватар для zip000
zip000 zip000 вне форума
Начинающий
 
Регистрация: 24.07.2007
Сообщения: 194
Репутация: 25
По умолчанию

moo2k, человек говорит о другом.
Код:
procedure TForm1.FormCreate(Sender: TObject);
begin
  ShowMessage(ParamStr(1));
end;
Функция ParamStr возвращает параметры, переданные программе, нулевым параметром (т.е. ParamStr(0)) будет имя самой программы, первым параметром (ParamStr(1)) - файл который надо открыть.
__________________
Не профи, но и не чайник . D6 - лучше не придумали. Пока.
Ответить с цитированием