[Deplhi] richiesta di aiuto da un nn programmatore

[Paky]

premetto che nn sono un programmatore e mi scuso se irrompo in questa sezione come un elefante in una cristalleria, ma nn so davvero a chi chiedere aiuto

Ho per le mani la soluzione ad un problema che ho con un programma (progDVB) che sul mio PC crasha

sfortunatamente mi mancano i mezzi e conoscenze per operare

a questo -> link un utente posta la soluzione del problema che consiste in un eseguibile di sua programmazione che va a fare da launcher al ProgDVB e ne impedisce il crash

riporta anche il codice

program ProgDVBlauncher;

uses
Forms, Windows, sysutils, messages;


const
iNagScreen = 'Transponder list options';

var hw: HWND;
timer: Cardinal;

{$R *.res}

begin
Application.Initialize;
Application.Title := 'ProgDVB launcher';
Application.Run;

SetCurrentDir('C:\Program Files\ProgDVB');
WinExec('C:\Program Files\ProgDVB\ProgDVB.exe', SW_NORMAL);

timer := 0;
repeat
sleep(400);
Inc(timer);
HW := FindWindow(nil,iNagScreen);
until (hw <> 0) or (timer>=100);

if hw <> 0 then
begin
SendMessage(hw,WM_CLOSE,0,0);
end;

end.

ma sfortunatamente i path si riferiscono al windows inglese ,mentre il programma nel mio Pc risiede in C:\Programmi\....

nella mia totale ignoranza ho pensato potesse trattarsi di Delphi, googlando un pò la struttura pare quella

qualcuno di buon cuore potrebbe gentilmente ricompilarlo con i path corretti?

grazie in anticipo

[Paky]

nessuno ?

[Dr. Oviri]

Sì è in Delphi

Ma scusa non fai prima a spostare l'eseguibile come da path?
Crei la cartella C:\Program Files\ProgDVB e ci metti l'eseguibile e, se necessario, gli altri files del programma

[Paky]

si tu hai perfettamente ragione , però mi secca un mondo installare un programma in un directory fittizia

Qualche giorno fa ho scaricato Lazarus convinto che sarebbe stato un gioco da ragazzi compilare l'eseguibile , invece da errore sin dalla prima linea