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

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

Непонятки с ShellExecute... [D6, D7, Win95/98, WinXP]


ArchValentin ©   (2005-01-09 08:41:00) 

Народ, подскажите. Чё за фигня?
Делаю так:

if ShellExecute(h, 'open', 'C:\Program Files\Odigo\Bin\Odigo.exe', nil, nil, SW_SHOW) < 32 then
       begin
               ShowMessage('Немогу выполнить ShellExecute !')
       end;

Работает!

А так:

edit1.text:='C:\Program Files\Odigo\Bin\Odigo.exe'

if ShellExecute(h, 'open', PChar(edit1.text), nil, nil, SW_SHOW) < 32 then
       begin
               ShowMessage('Немогу выполнить ShellExecute !')
       end;


Нифига не хочет! Ткните меня носом, где я ошибаюсь.


ArchValentin   (2005-01-10 14:28:00) [1]

...путать имена едитов...:)))


www.Vlad.uk   (2005-01-10 11:59:00) [2]

А как зависнешь-что делать-то будешь?:)))


ArchValentin   (2005-01-10 06:54:00) [3]

ха, народ, извиняйте, действительно мой косяк, я с именам едитов напутал, всй равно всем спасиба... Отсюда вывод, ночью надо спать, а не перед компом зависать :)))


ArchValentin   (2005-01-10 06:53:00) [4]

ха, народ, извиняйте, действительно мой косяк, я с именам едитов напутал, всй равно всем спасиба...


VMcL   (2005-01-10 06:32:00) [5]

>> ArchValentin ©  (10.01.05 05:46) [6]

Ну раз невозможно, то медицина тут бессильна.


ArchValentin   (2005-01-10 05:46:00) [6]

...что невозможно, т.к. всё это распологается на одной форме...


Kerk   (2005-01-09 15:53:00) [7]

ArchValentin ©   (09.01.05 15:47) [4]
а говорит оно, многозначительно "2"

действительно многозначительно.. и означает оно ERROR_FILE_NOT_FOUND


ArchValentin   (2005-01-09 15:47:00) [8]


> скажи что возвращает ShellExecute

а говорит оно, многозначительно "2"


Kerk   (2005-01-09 14:24:00) [9]

YurikGL ©   (09.01.05 14:19) [2]
так не будет компилироваться.

ArchValentin ©   (09.01.05 8:41)
скажи что возвращает ShellExecute


YurikGL   (2005-01-09 14:19:00) [10]


> if ShellExecute(h, 'open', edit1.text, nil, nil,
> SW_SHOW) < 32 then

а так работает?

Кстати, что говорит то?


Fay   (2005-01-09 08:52:00) [11]

Давай с начала. Что возврашает ShellExecute?


Наверх

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