Pa treba da imaš kompajler kod sebe pa da kompajliraš source, ili da napraviš exe fajl u delphiju, iskompajliraš ga, a onda ga *nekako* ubaciš kao resurs u taj drugi exe fajl (pretvoriš tvoj .exe u .res fajl koristeći bin\brcc32.exe) pa ga pri pokretanju extractuješ.
Unit bi ti izgledao ovako:
Code:
var
Form1: TForm1;
implementation
{$R *.dfm}
{$R c:\Izvor.RES} { ovo je bitno!!! }
procedure TForm1.Button1Click(Sender: TObject);
var
Res : TResourceStream;
begin
res:=tresourcestream.Create(hinstance,'resurs',Pchar('wav'));
res.SaveToFile('d:\zvuk.wav');
res.Free;
end;
p.s. Ovo je samo okvirno rešenje, ja ovo baš baš dugo nisam koristio tako da ne znam baš tačno kako se koristi, ali...
Laravel Srbija.
[NE PRUŽAM PODRŠKU ZA PHP PREKO PRIVATNIH PORUKA!]
Kako da se pri izvrsavanju programa kreira poseban Delphi-jev exe fajl?
Registrovani: 3 ( Darko Nedeljković, optix, B3R1 )