2

В программу должна была быть встроена кнопка ведущая на внешний ехе-шник. Есть строковая переменная Path, которой я в начале присвоил текущий путь:

Path:=extractfilepath(paramstr(0));

С помощью этой переменной у меня браузер переключался между страницами.

if Node.StateIndex = 8 then
WebBrowser1.Navigate(Path+'kek\l5.htm');

Но когда я делаю то же самое с тем внешним ехе-шником, то это уже не работает. Вот я открываю внешний файл по нажатию кнопки:

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
ShellExecute(handle,'open','C:\Users\Пользователь1\Desktop\kekek\test.exe',nil,nil,SW_SHOW);
end;

Это работает только если я пишу полный путь, что естественно никуда не годится. Если я делаю вот так:

ShellExecute(handle,'open',Path+'test.exe',nil,nil,SW_SHOW);

То появляется ошибка [Error] Unit1.pas(292): Incompatible types: 'String' and 'PAnsiChar'.

Подскажите пожалуйста либо как починить этот код, либо какой-то другой способ открыть внешний файл.

3
  • попробуйте PChar(Path+'test.exe')
    – Grundy
    24 ноя 2015 в 14:44
  • @Grundy спасибо большое! 24 ноя 2015 в 15:51
  • @Grundy Пожалуйста, опубликуйте ваш комментарий в виде ответа. 25 ноя 2015 в 5:57

1 ответ 1

1

Данная WinApi функция принимает в качестве параметра указатель на строку и для литералов строк компилятор занимается приведением сам.

Но так как в данном случае передается не литерал строки, нужно привести его к нужному типу вручную

PChar(Path+'test.exe')

Ваш ответ

By clicking “Отправить ответ”, you agree to our terms of service and acknowledge that you have read and understand our privacy policy and code of conduct.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками или задайте свой вопрос.