Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Вопрос по ShellExecute [D5, WinXP]


TNewb ©   (2004-05-14 19:18:00) 

Ув. мастаки, у меня возникла проблема с сабжем. При попытке вызвать функцию ShellExeCute (Handle,'open',Path+FileName,nil,nil,Sw_SHOW) выдает ошибку типо несовместимость типов, когда-же прописываю вместо Path+FileName - 'D:\Delphi\Priject\MyProgram.exe' то все работает. Подскажите пожалуйста как запустить ShellExecute чтоб имя файла задать переменной?


GuAV   (2004-05-16 12:56:00) [1]


> Скорее всего ты забываешь в конце переменной Path добавлять
> '\' и получаешь имя несуществующего каталога.


и из-за этого компилятор выдает
> Error: Integer and PChar Incompatible types


8-)


SpartakVC   (2004-05-16 03:52:00) [2]

Скорее всего ты забываешь в конце переменной Path добавлять '\' и получаешь имя несуществующего каталога.
Используй
ShellExeCute
(Handle,'open',PChar(Path+'\'+FileName),nil,nil,Sw_SHOW) и
всё у тебя будет хорошо


  (2004-05-15 17:31:00) [3]

Удалено модератором


DeadMeat   (2004-05-15 17:12:00) [4]

Самое интересное - кто из них может быть Integer, Pathили FileName...
:))

---
...Death Is Only The Begining...


Игорь Шевченко   (2004-05-14 23:07:00) [5]

TNewb   (14.05.04 19:33)


> Error: Integer and PChar Incompatible types


А самому головой подумать религия мешает ?


Druid   (2004-05-14 22:49:00) [6]

Должно работать с Pchar. Пример из одного из моих проектов

ShellExecute(Handle, 'open',PChar(RecZapusk^.ProgrammaZapusk),PChar(RecZapusk^.ParammetriZapuska), nil, SW_SHOWNORMAL);


TUser   (2004-05-14 22:12:00) [7]

PAnsiString


TNewb   (2004-05-14 19:33:00) [8]

2 MU:
Error: Integer and PChar Incompatible types


MU   (2004-05-14 19:22:00) [9]

ShellExeCute (Handle,'open',PChar(Path+FileName),nil,nil,Sw_SHOW)


Наверх

Титульная страница Поиск, карта сайта Написать письмо