volvo Благодарю, сейчас попробуем.
Добавлено (26.10.04 11:31):Код
procedure TfrmPPG.btnRunClick(Sender: TObject);
var
iDelim: integer;
sProjSettFile, ss: string;
begin
iDelim := Pos(' ',frmPPG.lstProjects.Items.Strings[frmPPG.lstProjects.ItemIndex]);
sProjSettFile := Copy(frmPPG.lstProjects.Items.Strings[frmPPG.lstProjects.ItemIndex],1,iDelim-1) + '_settings.bat';
ss := 'D:\delphi\' + sProjSettFile;
WinExec(ss,SW_SHOW);
end;
При запуске...
Цитата
Incopatible types "String" and "PAnsiChar"
Ругается на переменную ss, которая тип-String, однако, как переконвертировать String в PAnsiChar?
Или вообще, так как я делаю - неправильно в корне?
ss содержит путь и имя файла, который надо запускать. Вычисляется программно, не из формы.