Файл настроек, запуск. Дельфи
2242
10
как прописать запуск программки, если путь до неё читается из файла настроек в переменную. Пробовал
p:string;
WinExec(Pchar(p+'test.exe'), SW_SHOW);
а так же через ShellExecute , но везде постигла неудача
p:string;
WinExec(Pchar(p+'test.exe'), SW_SHOW);
а так же через ShellExecute , но везде постигла неудача
спасиб
слух, ты знаешь хорошие ссылки на хорошие сайты с хорошей инфой по хорошему дельфи, чтобы писать хороший код для хороших программ ?
Если знаешь - напиши плз, если не сложно
слух, ты знаешь хорошие ссылки на хорошие сайты с хорошей инфой по хорошему дельфи, чтобы писать хороший код для хороших программ ?
Если знаешь - напиши плз, если не сложно
craxx
рыжий котэ
Тут самый верхний топик называется Ссылки полезные всем. Смотри внимательнее.
да, и на счёт "нормального способа"
толи я не так объяснил, толи ты не так понял, но у меня путь до запускаемого файла прописывается в файле config.cfg откуда считывается в переменную, которая и представляет собой путь до запускаемого файла, вот мне и надо реализовать код, только пока голова сообразить не может что ему не нравится. И этот код что ты дал у меня в делфне 7 матерится плохими словами
толи я не так объяснил, толи ты не так понял, но у меня путь до запускаемого файла прописывается в файле config.cfg откуда считывается в переменную, которая и представляет собой путь до запускаемого файла, вот мне и надо реализовать код, только пока голова сообразить не может что ему не нравится. И этот код что ты дал у меня в делфне 7 матерится плохими словами
Юзай так...
procedure TForm1.Timer1Timer(Sender: TObject);
{Читаем путь}
Var
f:textfile;
begin
AssignFile(f,'config.cfg');
Reset(f);
ReadLn(f,c);
CloseFile(f);
end;
procedure TForm1.Button1Click(Sender: TObject);
{Запуск приложения}
var
w1: Word;
p1, p2: array[0..100] of Char;
begin
StrPcopy(p1, 'TEST');
if GetModuleHandle(p1) = 0 then
begin
StrPcopy(p2, c + 'LNetScan.exe');
w1 := WinExec(p2, SW_Restore);
end;
end;
procedure TForm1.Timer1Timer(Sender: TObject);
{Читаем путь}
Var
f:textfile;
begin
AssignFile(f,'config.cfg');
Reset(f);
ReadLn(f,c);
CloseFile(f);
end;
procedure TForm1.Button1Click(Sender: TObject);
{Запуск приложения}
var
w1: Word;
p1, p2: array[0..100] of Char;
begin
StrPcopy(p1, 'TEST');
if GetModuleHandle(p1) = 0 then
begin
StrPcopy(p2, c + 'LNetScan.exe');
w1 := WinExec(p2, SW_Restore);
end;
end;
да, и на счёт "нормального способа""нормальный", ибо CreateProcess.
толи я не так объяснил, толи ты не так понял, но у меня путь до запускаемого файла прописывается в файле config.cfg откуда считывается в переменную, которая и представляет собой путь до запускаемого файла
в IDE: WinExec+F1 и прочитайте почему не стОит.
думается, в Вашем случае вполне можно обойтись ShellExecute.
какая разница, где у Вас прописывается?
какие ошибки и на каких строках? мы должны угадать?
Сейчас читают
Астрология, Таро, ясновидение... Ответы на вопросы
453431
1000
что такое Эзотерика (часть 5)
265004
1000
Земля плоская!?
69033
189
Сибиряк
old hamster
VarНафига такой гиморой? Если нужен файл настроек, то луче сразу юзать ini - файлы
f:textfile;
А еще лучше TRegIniFile или TRegistry, т.е. реестр.
Реестр это хорошо, когда приложение "непереносимое". Если тебе нужно что то куда то перетащить, да ещё и с данными, то лучше ini
Сибиряк
old hamster
хорошие ссылки на хорошие сайты с хорошей инфой по хорошему дельфиВот тебе парочка:
http://web.ict.nsc.ru/~cancel/delphi/
http://delphimaster.ru