امتیاز موضوع:
  • 2 رأی - میانگین امتیازات: 3
  • 1
  • 2
  • 3
  • 4
  • 5
عوض کردن آیکون EXE در Delphi XE3
نویسنده پیام
The.Ghost غایب
مدیر بازنشسته
*****

ارسال‌ها: 461
موضوع‌ها: 201
تاریخ عضویت: مهر ۱۳۸۸

تشکرها : 674
( 354 تشکر در 158 ارسال )
ارسال: #1
Question  عوض کردن آیکون EXE در Delphi XE3
با سلام
می خواهم آیکون یک EXE را عوض کنم ولی هر کاری که می کنم بازم درست نمیشه لطفا راهنمایی کنید.
EXE مورد نظر با دلفی Delphi XE3 ایجاد شده است و یک EXE معمولی می باشد که داخلش هیچ کدی نوشته نشده است.
من این کد زیر پیدا کردم البته یکمی هم تغییرش دادم. هر کاری که می کنم توی دلفی Delphi XE3 نمیشه که باهش آیکون یک EXE دیگر را تغییر داد؟؟؟؟
کد:
procedure TForm1.Button2Click(Sender: TObject);
var
  FileHandle: THandle;
  MyIcon : TIcon;
begin
MyIcon := TIcon.Create;
MyIcon.LoadFromFile('D:\Icon2.ico');

FileHandle := BeginUpdateReSource(PChar('D:\Ali.exe'), False);
UpdateReSource(FileHandle, RT_GROUP_ICON, 'MAINICON', 1033, @MyIcon, SizeOf(MyIcon));

EndUpdateReSource(FileHandle, False);

MyIcon.Free;
end;
ویندوز کامپیوتر هم سون 64 بیتی می باشد.
لطفا راهنمایی کنید با تشکر فراوان.

Assembly Language 039

۲۴-مرداد-۱۳۹۲, ۱۶:۳۴:۴۵
ارسال‌ها
پاسخ


موضوعات مرتبط با این موضوع...
موضوع نویسنده پاسخ بازدید آخرین ارسال
  codegear rad studio 2009 To Delphi Prism lukaskain 0 356 ۰۸-اردیبهشت-۱۳۹۸, ۰۱:۴۳:۵۶
آخرین ارسال: lukaskain
  Crack Embarcadero RAD Studio XE3 The.Ghost 2 3,414 ۰۶-اردیبهشت-۱۳۹۸, ۰۱:۰۲:۲۴
آخرین ارسال: lukaskain
  Exe Crypto(exe loader) lord_viper 4 3,104 ۰۵-دى-۱۳۹۵, ۱۱:۱۴:۴۱
آخرین ارسال: lord_viper
  مشکل در اندازه و فونت در Delphi 10 Seattle The.Ghost 2 1,895 ۲۲-مهر-۱۳۹۴, ۱۴:۳۴:۳۷
آخرین ارسال: The.Ghost
Question how RightToLeft Text Hint in delphi The.Ghost 0 1,398 ۲۱-اردیبهشت-۱۳۹۴, ۱۵:۲۱:۵۷
آخرین ارسال: The.Ghost
Question تغییر نام exe در رم The.Ghost 4 2,909 ۲۰-بهمن-۱۳۹۳, ۰۴:۰۴:۱۰
آخرین ارسال: The.Ghost
  Indy 10 for Delphi 7 xxxzzz 0 1,440 ۱۲-آذر-۱۳۹۳, ۰۵:۳۴:۲۱
آخرین ارسال: xxxzzz
Question Connecting to SQL Server 2000 using Delphi and dbExpress The.Ghost 2 2,553 ۰۷-آذر-۱۳۹۳, ۲۲:۴۴:۲۳
آخرین ارسال: The.Ghost
  سریال معتبر برای نصب Delphi XE5 godvb 0 2,503 ۲۶-مهر-۱۳۹۲, ۱۴:۳۰:۴۰
آخرین ارسال: godvb
  عدم اجرای مجدد exe با کلیک مجدد siroosss 2 1,930 ۲۴-مهر-۱۳۹۲, ۱۵:۰۴:۲۵
آخرین ارسال: siroosss

پرش به انجمن:


کاربرانِ درحال بازدید از این موضوع: 1 مهمان

صفحه‌ی تماس | IranVig | بازگشت به بالا | | بایگانی | پیوند سایتی RSS