Delpide Exe Olusturmak - Delphi- Zamansız Tartışma Platform

Yσкє∂!¢! · 30-12-07, 19:09 Çevrimdışı

Ilk Önce Olusturmak Istediginiz Dosyayi " C: " Dizinine Kopyalayin, " C: " Dizininde Bir Text Dosyasi Olusturun, Ve Text Dosyasina

Rapier EXE "C:\Rapier.exe"
Yazin Ve Dosyayi Rapier.rc Olarak Kaydedin.
Komut Satirini Açin(Baslat/Çalistir/Cmd) Ve Kod:

brcc32 Rapier.rc

Parantez Içindekini Yazin (Rapier.rc Dosyasi Nerede Ise Orayi Yazin)). Kod:

C:/>brcc32 Rapier.rc

Enter'a Bastiginiz Zaman C:'de Rapier.res Dosyasi Olusmus Olmasi Lazim. Res Dosyasini Alip Ekleyecegimiz Programin Oldugu Klasore Atiyoruz Ve Kodunda Kod:

{$R *.DFM}

Bu Sekilde Bir Yazi Olacak Bunun Yanina Kod:

{$R Rapier.RES}

Bunu Ekleyin. Implemention'un Altinda Kod:

{$R *.DFM} {$R Rapier.RES}

Böyle Görünmesi Gerek!!!

Ve Exe Olusturmak Içinse Asagidaki Komutlar Yeterli
Kod:

procedure ExtractRes(ResType, ResName, ResNewName: String);
var
Res: TResourceStream;
begin
Res := TResourceStream.Create(Hinstance, ResName, PChar(ResType));
try
Res.SaveToFile(ResNewName)
Finally
Res.Free
end;
end;

ButtonClick Olayina;
ExtractRes('exe', 'Rapier', 'Server.exe'); //ExtractRes('Res Olusturdugunuz Dosyanin Türü (Exe, Avi, Jpg, vs)', 'Res Olusturdugunuz Dosyanin Adi', 'Yeni Olusturacaginiz Dosyanin Adi(.exe Türünü Yazmayi Unutmayin)'); //

30-12-07, 19:09 Çevrimdışı	#1
Dekan Yσкє∂!¢! Huzur Pınarı Genel Mesajlar: 5.514 Teşekkür etti: 1.462 Teşekkür edildi: 2.042 RepForum Gücü: 66 Forum Puanı:23493 Ruhsal Durumum:	Delpide Exe Olusturmak Ilk Önce Olusturmak Istediginiz Dosyayi " C: " Dizinine Kopyalayin, " C: " Dizininde Bir Text Dosyasi Olusturun, Ve Text Dosyasina Rapier EXE "C:\Rapier.exe" Yazin Ve Dosyayi Rapier.rc Olarak Kaydedin. Komut Satirini Açin(Baslat/Çalistir/Cmd) Ve Kod: brcc32 Rapier.rc Parantez Içindekini Yazin (Rapier.rc Dosyasi Nerede Ise Orayi Yazin)). Kod: C:/>brcc32 Rapier.rc Enter'a Bastiginiz Zaman C:'de Rapier.res Dosyasi Olusmus Olmasi Lazim. Res Dosyasini Alip Ekleyecegimiz Programin Oldugu Klasore Atiyoruz Ve Kodunda Kod: {$R .DFM} Bu Sekilde Bir Yazi Olacak Bunun Yanina Kod: {$R Rapier.RES} Bunu Ekleyin. Implemention'un Altinda Kod: {$R .DFM} {$R Rapier.RES} Böyle Görünmesi Gerek!!! Ve Exe Olusturmak Içinse Asagidaki Komutlar Yeterli Kod: procedure ExtractRes(ResType, ResName, ResNewName: String); var Res: TResourceStream; begin Res := TResourceStream.Create(Hinstance, ResName, PChar(ResType)); try Res.SaveToFile(ResNewName) Finally Res.Free end; end; ButtonClick Olayina; ExtractRes('exe', 'Rapier', 'Server.exe'); //ExtractRes('Res Olusturdugunuz Dosyanin Türü (Exe, Avi, Jpg, vs)', 'Res Olusturdugunuz Dosyanin Adi', 'Yeni Olusturacaginiz Dosyanin Adi(.exe Türünü Yazmayi Unutmayin)'); // Şahit olsun Kainat, Alemler şahit olsun . Titreyen sesin ile Yüregin şahit olsun. Çok Yakın Güzel Günler,Bir Kez Daha Ufka Bak, Hep Semaya Açtıgın,Ellerin Şahit Olsun. Ö(lürsem)S(ebebi)S(ensin) Deli Var YakalaYın

Konu Seçenekleri
Yazdırılabilir Sümü Göster Sayfayı E-Mail'le gönder