Помогите с программированием на delphi. - есть ответ

fk_ku, 413 просмотров

В программе присутствует следующий код:
var direct:string;prog:string;s:string; sc:Char;
begin
direct:=Application.ExeName;
prog:='\обработка\Project1.exe';
s:=direct+prog;
sc:=PChar(s);
ShellExecute(Self.Handle, 'open',sc, nil, nil, SW_SHOWNORMAL);
end;
Хочу этим кодом добиться чтобы открывалось приложение из одной из папок где находится уже запущенное мной приложение.
Компилятор ругает на строчку sc:=PChar(s) и выдает ошибку:
incompatible types char and ansichar. Не могу понять что делаю не так.

Ответы:

беляеиф

Потму что sc у вас типа char, а присваиваете ему выражение типа pchar. Вот если бы компилятор не ругался, я бы удивился

Андрей Архангельский

1) какая у тебя строка s получается?
s := direct+prog; = "D:\project\newprojects\projName.exe\\обработка\Project1.exe"
Как ты думаешь что в результате получиться?
Нужно из Application.ExeName извлечь путь
direct := ExtractPath(Application/ExeName);

11 лет назад

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.