Mega Code Archive

 

Categories / Delphi / Ide Indy

 

Exe dosyasina her hangibir dosya [txt, mid vb] nasil gomulur

{ Projenize resource eklemek icin Sirayla takip ediniz. Delphi 4.0 icin: 1. Project|Resources komutu veriniz. 2. Gelen pencerede sag tiklayip New|User Data 3. Resource tipini yaziniz. Ornek: EXE (RcData gelecektir) 3. Hangi dosyayi eklemek istiyorsaniz seciniz 4. Exe_1 olarak Exe tipinde eklenecektir. EXE_1 in üzerinde sag tiklayip Rename dedikten sonra EXE_1'i herhangi bir tamsayi ile adini degistirin. Ör: 1 (EXE_1 -> 1) } procedure SaveRessourceToFile(const FileName, ResType: string; ResId: Integer); var MStream: TResourceStream; begin MStream := TResourceStream.CreateFromID(HInstance, ResId, PChar(ResType)); try MStream.SaveToFile(FileName); finally MStream.Free; end; end; // Kullanimi: (Yukardaki islemden sonra SaveRessourceToFile('c:\deneme.exe', 'EXE', 1);