[delphi]:shell execute e percorso applicazione

[elevation]

ciao a tutti,
come faccio ad inserire il percorso completo della cartella in cui è
installata la mia applicazione nel comando shell execute??? so dell'esistenza di ExtractFilePath(Application.ExeName) ma...come
faccio ad integrarlo nel comando shell execute???

ciao

[alka]

Memorizza il percorso in una variabile locale e passalo alla ShellExecute castandolo al tipo PChar:

var
  s: string;
begin
  s := ExtractFilePath(Application.ExeName);
  ShellExecute(PChar(s), ...);
end;
(codice non verificato)

Ciao!

[elevation]

grazie mille!!!! Testato e funzionante:

var
  s: string;
begin
  s := ExtractFilePath(Application.ExeName);
  If Copy(S, Length(S), 1) <> '\' Then S := S + '\';
  s:=s+'backup.exe';


  shellexecute(Handle,nil,PChar(s),nil,nil,SW_SHOW);
  end;