Тема: блокнот
Показать сообщение отдельно
  #2  
Старый 05.06.2010, 20:06
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,096
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Обрабатывать параметры командной строки:
Код:
procedure TForm1.FormCreate(Sender : TObject);
begin
  If ParamCount > 0 Then
    Begin
      If FileExists(ParamStr(1)) Then
         RichEdit1.Lines.LoadFromFile(ParamStr(1)); // тут на вскидку не помню, просто загрузка файла...
    End;
end;
Ответить с цитированием