ShellAPI

@Ar3ix113 · Регистрация: 02.05.2013

Author24 — интернет-сервис помощи студентам

Помогите пожалуйста прописать путь. Мне нужно чтобы программу находило не на разделе,а в определенной папке т.е
чтобы я мог к кому угодно придти и запустить программу вот код :

Delphi    
        
    Скопировано
1
2
3
4
procedure TForm1.btn1Click(Sender: TObject);
begin
ShellExecute(0, nil, 'Oper\arab.exe', nil,nil, SW_SHOWMINIMIZED)
end;

Мне сказали что нужно создать отдельную папку закинуть туда ехе файл и указать путь к файлу чтобы при установке программы там уже будет существовать пака откуда будет запускаться программа.

13.05.2013, 11:47

Если запускаемая программа находится в той же папке что и основная, достаточно убрать "Oper". Если в процессе работы текущий каталог может измениться тогда:

Delphi    
        
    Скопировано
1
2
3
4
procedure TForm1.btn1Click(Sender: TObject);
begin
  ShellExecute(0, nil, PChar(ExtractFilePath(ParamStr(0)) + 'arab.exe'), nil,nil, SW_SHOWMINIMIZED)
end;

@MrOnlineCoder · 13.05.2013, 17:50

Сообщение от Ar3ix113

Помогите пожалуйста прописать путь. Мне нужно чтобы программу находило не на разделе,а в определенной папке т.е
чтобы я мог к кому угодно придти и запустить программу вот код :

procedure TForm1.btn1Click(Sender: TObject);
begin
ShellExecute(0, nil, 'Oper\arab.exe', nil,nil, SW_SHOWMINIMIZED)
end;

Мне сказали что нужно создать отдельную папку закинуть туда ехе файл и указать путь к файлу чтобы при установке программы там уже будет существовать пака откуда будет запускаться программа.

А эта программа есть на всех компах? Что вы имеете ввиду?

Новые блоги и статьи Все статьи Все блоги /
Простая нейросеть на КуМир: Создание и обучение EggHead 16.03.2025 Искусственные нейронные сети — удивительная технология, позволяющая компьютерам имитировать работу человеческого мозга. Если вы хотя бы немного интересуетесь современными технологиями, то наверняка. . .	Исполнитель Кузнечик в КуМир: Решение задач EggHead 16.03.2025 Среди множества исполнителей в системе КуМир особое место занимает Кузнечик — простой, но невероятно полезный виртуальный персонаж, который перемещается по числовой прямой, выполняя ваши команды. На. . .	Исполнитель Водолей в КуМир: Решение задач EggHead 16.03.2025 Разработка алгоритмического мышления — одна из ключевых задач для начинающих программистов, и система КуМир предлагает отличный способ погрузиться в этот процесс. Среди множества исполнителей в этой. . .	Исполнитель Чертежник в КуМир: Решение задач EggHead 16.03.2025 Представьте, что вы можете рисовать на бесконечной координатной плоскости, перемещая точку, которая оставляет след. По вашей команде она может поднять перо и двигаться, не оставляя следа, или. . .	Исполнитель Робот в КуМир: Решение задач EggHead 16.03.2025 КуМир (Комплект Учебных МИРов) — это учебная среда программирования, разработанная специально для обучения базовым концепциям алгоритмизации. Её главная фишка — использование русскоязычного. . .
Исполнитель Черепаха в КуМир: Решение задач EggHead 16.03.2025 Представьте, что вы впервые учитесь программировать, а перед вами стоит задача заставить маленькую виртуальную черепашку рисовать на экране. Звучит забавно? Эта идея зародилась ещё в 1967 году, когда. . .	Конвейеры данных с Apache Kafka Javaican 16.03.2025 В мире, где данные стали новой нефтью, Apache Kafka зарекомендовал себя как мощный инструмент для построения надежных и масштабируемых конвейеров данных. Созданный изначально командой LinkedIn в 2011. . .	Deno против Node.js: Будущее JavaScript рантайма run.dev 16.03.2025 За последнее десятилетие Node. js стал абсолютным лидером среди JavaScript-рантаймов и фактическим стандартом для серверной разработки на JavaScript. Но в 2018 году тот же разработчик, который создал. . .	SwiftUI или UIKit - что выбрать для нового приложения iOS? mobDevWorks 16.03.2025 Когда Apple представила SwiftUI на WWDC 2019, многим показалось, что дни UIKit сочтены. Новый декларативный фреймворк предлагал радикально иной подход к разработке интерфейсов. Вместо кропотливого. . .	Docker: Руководство для начинающих по созданию первого приложения Mr. Docker 16.03.2025 Docker — это платформа, которая упаковывает ваше приложение и все его зависимости в стандартизированные блоки, называемые контейнерами. Эти контейнеры изолированы друг от друга и от основной системы,. . .

@MrOnlineCoder Всегда онлайн 1084 / 788 / 295 Регистрация: 07.04.2013 Сообщений: 2,703
	13.05.2013, 17:50	3
	Сообщение от Ar3ix113 Помогите пожалуйста прописать путь. Мне нужно чтобы программу находило не на разделе,а в определенной папке т.е чтобы я мог к кому угодно придти и запустить программу вот код : procedure TForm1.btn1Click(Sender: TObject); begin ShellExecute(0, nil, 'Oper\arab.exe', nil,nil, SW_SHOWMINIMIZED) end; Мне сказали что нужно создать отдельную папку закинуть туда ехе файл и указать путь к файлу чтобы при установке программы там уже будет существовать пака откуда будет запускаться программа. А эта программа есть на всех компах? Что вы имеете ввиду? 0