[Alxd]

Немного разобрался

Код:

procedure TfrmSettings.btOpenPath1CClick(Sender: TObject);
begin
  OpenDialog.Filter:='Файл запуска 1С Предприятия|1cv8.exe';
  OpenDialog.Title:='Укажите путь запска 1С Предприятия';
  if OpenDialog.Execute then
  begin
    EditPath1C.Text:= OpenDialog.Files[0];
    MainData.RunPath:=EditPath1C.Text;
  end;
  OpenDialog.Destroy;
end;

Если OpenDialog не вызывать, а EditPath заполнять руками и потом

MainData.RunPath:=EditPath1C.Text;

...то все работает.
Подскажите, как это лечить?