[Alexo]

Код:

procedure TForm1.ToolButton1Click(Sender: TObject);
begin
shellExecute(application.Handle,'open','C:\1\1.exe ', nil,nil,SW_SHOW);
end;

на

Код:

procedure TForm1.ToolButton1Click(Sender: TObject);
var
  s: string;
begin
// тут присваиваем переменной s строку из ини файла
shellExecute(application.Handle,'open',s, nil,nil,SW_SHOW);
end;