اقدامات نهایی پروژه

[saeed7474]

سلام دوستان من یه پروژه نرم افزاری داشتم که تموم شد
الان چند سوال داشتم میخوام تبدیل کنم به فایل اجرایی

ایا قونت های طراحی و کامپوننت هایی که بهش افزودم هم نیاز هست در فایل نصب باشه ؟
چون شاید سیستمی اون فونت ها و او سی ایکس ها رو نداشته باشه

ممنون میشم یه راهنمایی کامل بکنید:قلب:

[MohammadGh2011]

سلام عليکم


ایا قونت های طراحی و کامپوننت هایی که بهش افزودم هم نیاز هست در فایل نصب باشه ؟
چون شاید سیستمی اون فونت ها و او سی ایکس ها رو نداشته باشه


100 درصد دوست عزيز،اگه فونتهاي مخصوصي که در برنامه استفاده کرديد رو هم کنار برنامه براي نصب نزاريد برنامتون در سيستم کاربر به مشکل بر ميخوره.

موفق باشيد

[saeed7474]

فونت هارو چطور همراهش نصب کنم ؟

[MohammadGh2011]

فونت هارو چطور همراهش نصب کنم ؟
سلام
ببينيد بعضي از برنامه هاي ساخت ستاپ هستند که گزينه اي دارند براي اينکار.ولي اگه فونتها رو در پوشه Fonts کپي کنيد مشکل حل ميشه...


موفق باشيد

[saeed7474]

راستی ایکن رو چجوری تغییر بدم
از تو پروپرتیز پروژه چینج نمیشه!

[MohammadGh2011]

راستی ایکن رو چجوری تغییر بدم
از تو پروپرتیز پروژه چینج نمیشه!
آيکن چيو؟برنامت رو؟

[SlowCode]

کیفیت آیکون هات باید کمتر از 32bit باشه، وگرنه خطا میده.
http://www.img4up.com/up2/38672285569134974809.jpg

[سپهر-111]

کیفیت آیکون هات باید کمتر از 32bit باشه، وگرنه خطا میده.
http://www.img4up.com/up2/38672285569134974809.jpg


سلام علیکم
راستی چطور میشه ایکن با کیفیت بالاتر گذاشت؟؟
اخه همین پایین بودن کیفیت ایکن خودش یک عیبه !

[SlowCode]

سلام

2 راه هست:
1- استفاده از HexEditor و جایگزین کردن آیکون برنامه.
2- استفاده از توابع api.
توضیحات هر دو مورد توی سایت هست، لطفا جستجو کنین.

[saeed7474]

آيکن چيو؟برنامت رو؟
اره ایکن برنامه

و چیکار کنم بعد نصب ایکن بیاد رو دسکتاپ؟

ستاپ فکتوری خودش فونت هارو قرار نداد و کامپوننت ها !؟

[SlowCode]

و چیکار کنم بعد نصب ایکن بیاد رو دسکتاپ؟
توی محیط ستاپ روی برنامت راست کلیک کن و properties رو بزن و بعد تو قسمت shortcut دسکتاپ رو انتخاب کن. آیکون رو هم میتونی عوض کنی.
http://www.img4up.com/up2/61730778458739389639.jpg


ستاپ فکتوری خودش فونت هارو قرار نداد و کامپوننت ها !؟
فونت ها رو نه ولی کامپوننت ها رو اضافه میکنه.

[saeed7474]

توی محیط ستاپ روی برنامت راست کلیک کن و properties رو بزن و بعد تو قسمت shortcut دسکتاپ رو انتخاب کن. آیکون رو هم میتونی عوض کنی.
http://www.img4up.com/up2/61730778458739389639.jpg


فونت ها رو نه ولی کامپوننت ها رو اضافه میکنه.
چنین گزینه ای ندارم !؟

خب چیکار کنم کامپوننت ها و قونت ها رو اضافه کنه ؟

[saeed7474]

اها ایکنم اومد رو دسکتاپ اما الان بری پوشه نصب راحت برنامه مو میبینی یعنی رمز گذاری نیست و همه ایکن ویژوال بیسیکه
اینو چه کنم ؟

[saeed7474]

????????????????

[MohammadGh2011]

اره ایکن برنامه

و چیکار کنم بعد نصب ایکن بیاد رو دسکتاپ؟

ستاپ فکتوری خودش فونت هارو قرار نداد و کامپوننت ها !؟
توي برنامه ي ستاپ ساز خودش گزينه اي داره که بايد بزنيد تا يک shortcut داخل دسکتاپ بريزه.

[saeed7474]

توي برنامه ي ستاپ ساز خودش گزينه اي داره که بايد بزنيد تا يک shortcut داخل دسکتاپ بريزه.
اونو درست کردم اما وقتی میرین محل نصب ایکن خود ویژوال بیسیکه ُ اینو چطور درست کنم ؟

و یه مشکل دیگه وقتی ضبدر رو میزنین از برنامه خارج شین فکر کنم برنامه بسته نمیشه !!! یعنی هاید میشه ولی تو لیست فرایند ها باز میبه !؟

[MohammadGh2011]

اونو درست کردم اما وقتی میرین محل نصب ایکن خود ویژوال بیسیکه ُ اینو چطور درست کنم ؟

از مشخصات فرم آيکن رو انتخاب کنين.


و یه مشکل دیگه وقتی ضبدر رو میزنین از برنامه خارج شین فکر کنم برنامه بسته نمیشه !!! یعنی هاید میشه ولی تو لیست فرایند ها باز میبه !؟

اره بعضي مواقع اين کار اتفاق ميفته،شما ميتونين يه دکمه براي خروج بزارين يا يه کدي بنويسين که اون دکمه ضربدر غير فعال بشه.


موفق باشيد

[saeed7474]

از مشخصات فرم آيکن رو انتخاب کنين.


اره بعضي مواقع اين کار اتفاق ميفته،شما ميتونين يه دکمه براي خروج بزارين يا يه کدي بنويسين که اون دکمه ضربدر غير فعال بشه.


موفق باشيد

icon رو قبول نمیکنه ! ۴۲*۴۲ .ico

ضربدر با چه کدی غیر فعال میشه ؟

و از همین دستور end استفاده کنم دیگه درسته ؟

[saeed7474]

اصلا نمیشه اون ایکن نباشه ؟

[MohammadGh2011]

icon رو قبول نمیکنه ! ۴۲*۴۲ .ico

نه قبول نميکنه اين رو بايد خيلي پايين باشه مثلا 16*16
يه سر به اين سايت بزنيد (http://www.iconarchive.com/) شايد آيکن هاي مخصوصي رو پيداکنيد.
ساده ترين راه براي اينکار استفاده از دستور زير هستش ولي راه هاي ديگه اي هم هستش که دکمه ي غيرفعال و کم رنگ کنه که دستوراتش زياده:


ضربدر با چه کدی غیر فعال میشه ؟

Private Sub Form_Unload(Cancel As Integer)
Cancel = True
End Sub



و از همین دستور end استفاده کنم دیگه درسته ؟

کجا استفاده کنيد؟چي درسته؟

[MohammadGh2011]

اصلا نمیشه اون ایکن نباشه ؟
منظورتون کدوم آيکنه؟دکمه ي ضربدر؟

با استفاده از api هم ميشه:
Private Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Long, ByVal bRevert As Long) As Long
Private Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Long, ByVal nPosition As Long, ByVal wFlags As Long) As Long
Const MF_BYPOSITION = &H400&
Private Sub Form_Load()
DisableCloseWindowButton Me
End Sub
Public Sub DisableCloseWindowButton(frm As Form)
Dim hSysMenu As Long
hSysMenu = GetSystemMenu(frm.hwnd, 0)
RemoveMenu hSysMenu, 6, MF_BYPOSITION
RemoveMenu hSysMenu, 5, MF_BYPOSITION
End Sub

[saeed7474]

نه قبول نميکنه اين رو بايد خيلي پايين باشه مثلا 16*16
يه سر به اين سايت بزنيد (http://www.iconarchive.com/) شايد آيکن هاي مخصوصي رو پيداکنيد.
ساده ترين راه براي اينکار استفاده از دستور زير هستش ولي راه هاي ديگه اي هم هستش که دکمه ي غيرفعال و کم رنگ کنه که دستوراتش زياده:

Private Sub Form_Unload(Cancel As Integer)
Cancel = True
End Sub



کجا استفاده کنيد؟چي درسته؟
Cancel = True با اینکه برنامه بسته نمیشه اصلا !
منظورم یه کامند و کد end
یه ایکن گذاشتم قبول کرد ولی بقیه فرما قبول نمیکنه !

[saeed7474]

منظورتون کدوم آيکنه؟دکمه ي ضربدر؟

با استفاده از api هم ميشه:
Private Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Long, ByVal bRevert As Long) As Long
Private Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Long, ByVal nPosition As Long, ByVal wFlags As Long) As Long
Const MF_BYPOSITION = &H400&
Private Sub Form_Load()
DisableCloseWindowButton Me
End Sub
Public Sub DisableCloseWindowButton(frm As Form)
Dim hSysMenu As Long
hSysMenu = GetSystemMenu(frm.hwnd, 0)
RemoveMenu hSysMenu, 6, MF_BYPOSITION
RemoveMenu hSysMenu, 5, MF_BYPOSITION
End Sub


ایکن بالای فرم ایکن ویژوال بیسیک

[m2011kh]

آقا سعید لطفا هر سوالی دارید کامل درباره اش توضیح بدید.
دوستان رو به اشتباه میندازید.
جواب سوال خودتونم نمیگیرید.
لطفا هر سوالی دارید کامل توضیح بدید درباره اش.
برای ایکن ویژال بیسیکم دونه دونه همه فرما رو باید بهش ایکون بدی تا ایکونشون عوض بشه
یا حق
MMD

[saeed7474]

ببخشید چون من عجله دارم به قول شما خودمم نمیفهمم چی میگم :لبخند:

خب دونه دونه منم این کار رو میکنم بعضیا ایکنو قبول نمیکنن همون ایکنی که بقیه قبول میکنن

درضمن کدوم یکی از دوستان می تونه الان برنامه منو تو سیستمش یه تست بکنه ببینه اوکیه ؟

[m2011kh]

اول برنامه تو بزار هر کی تونست دان میکنه جوابشو بهت میده

[saeed7474]

هر کس تونست ‍پ.خ می کنم ..

[program2vb]

هر کس تونست ‍پ.خ می کنم ..

سلام به شما دوست عزیز

1 : آیکون : شما میتونی رو فرم اصلی کلیک کنی و از پروپرتیز آیکون مورد نظر رو انتخاب کنی و بزاری و هنگام کامپایل کردن پروژه همون آیکون میاد ... اگه میخوای آیکون با کیفیت بالا قرار بدی میتونی از برنامه هایی در این زمینه استفاده کنی ....
و اگه میخوای کلا روی فرمهات آیکون وجود نداشه باشه باید از قسمت
یا مقدار controlbox رو برابر false قرار بدی که در این صورت علامت ضرب در یا همون بستن فرم هم میره یا هم Borderstyle فرمتو برابر 4 قرار بدی .... و یک روش هم وجود داره که خودت میتونی آیکون درس کنی یعنی یه آیکون خالی درس کنی و بزاری اونجا و برا پروژه هم از آیکون مخصوص استفاده کنی

البته روش های دیگه هم هست که میتونی با استفاده از توابع آی پی آی و ...... این کارا رو بکنی

2: نصب فونت و کامپوننت : میتونی از برنامه های ستاپ ساز مثلا install shild و .... و یا خود ستاپ ساز وی بی استفاده کنی که هنگام نصب ویبی نصب میشه .... و یا میتونی خودت یا استفاده از چند روش ستاپ درس کنی که من روش ها شو میگم

1 - با استفاده از ریسورس
2- با استفاده از دیتابیس
3 - با استفاده از کپی کردن فایلها

که همه اینا هم جواب میده

امیدوارم جواب همه سوالهاتو گرفته باشی

اگه بازم سوالی کمکی راهنمایی داشتی من در خدمتم

پروژتم من امتحان میکنم

موفق و پیروز باشی ... یا علی

[SlowCode]

نه قبول نميکنه اين رو بايد خيلي پايين باشه مثلا 16*16
نه دوست عزیز به سایز آیکون ربطی نداره، شما حتی می تونی از آیکون 128*128 هم استفاده کنی.
یه نکته هم بگم، اگه آیکون همه فرمهات یکیه میتونی توی رویداد فرم لود فرم هات کد زیر رو بنویسی تا حجم برنامت بیاد پایین:
Private Sub Form_Load()
Me.Icon = Form2.Icon
End Sub

و از همین دستور end استفاده کنم دیگه درسته ؟
بله همین کارت رو راه می اندازه.

[saeed7474]

خیلی ممنون دوستان عزیز که کمک میکنید

برای کامپوننت ها ریسورس استفاده کردم

نمی دونم برای فونت هم همین امکان پذیره ؟ جای مسیر سیستم۳۲ کنترل پنل باید باشه ؟

دوست عزیز کدتنون برای ایکن کار نمیکنه ارور میده !

[SlowCode]

نه فونت رو باید به C:\Windows\Fonts بریزی.

دوست عزیز کدتنون برای ایکن کار نمیکنه ارور میده !
حتما اشتباه نوشتی چون من تا حالا چندین بار ازش استفاده کردم.

[saeed7474]

میشه درستشو بدین کد ایکن؟

فونت هارو هم مثل او سی ایکس ها تو ریسورس قرار بدم و فقط مسیرشو عوض کنم تو کد ؟

Sub main()
Call checkreg
mai.Show
End Sub
Sub checkreg()
On Error Resume Next
Dim pcbox As String
Dim ocxArray() As Byte
Dim BN As Integer
pcbox = Environ$("windir") & "\System32\" & "AlphaImageControl.ocx"
If Not Dir(pcbox) = vbNullString Then GoTo skip
load.Show
DoEvents
ocxArray = LoadResData(101, "CUSTOM")
BN = FreeFile
Open pcbox For Binary Access Write As #BN
Put #BN, , ocxArray
Close #BN

skip:
Shell "Regsvr32 AlphaImageControl.ocx /s"
Unload load
End Sub

[SlowCode]

میشه درستشو بدین کد ایکن؟
کد همونه فقط اونو باید توی فرم دیگه بنویسی، چه اروری داد؟

فونت هارو هم مثل او سی ایکس ها تو ریسورس قرار بدم و فقط مسیرشو عوض کنم تو کد ؟
بله.

[saeed7474]

همونو فقط باید بنویسم !!!!!!! ادرس ایکنو مگه جلوش نباید بدم ؟

[SlowCode]

همونو فقط باید بنویسم
بله

ادرس ایکنو مگه جلوش نباید بدم ؟
نه دیگه، وقتی می نویسی Me.Icon = Form1.Icon آیکون فرم جاری همون آیکون فرم 1 میشه.

[saeed7474]

اها من فکر کردم منضورتون اینه که بتون ایکن ها بزرگتر قرار بدیم . چون خود ویژوال که ۱۶ رو بزور قبول میکنه

[saeed7474]

ویه سوال دیگه :
نمی تونیم تعیین کنیم اگه فونتامون تو سیستمشون نبود فونت پیش فرض سیستمشون بشه فونت برنامه ؟

[SlowCode]

چون خود ویژوال که ۱۶ رو بزور قبول میکنه
نه اصلا اینطور نیست، من خودم از آیکون 128*128 هم استفاده کردم.

نمی تونیم تعیین کنیم اگه فونتامون تو سیستمشون نبود فونت پیش فرض سیستمشون بشه فونت برنامه ؟
نیازی نیست چون خود سیستم همین کار رو میکنه.

[MohammadGh2011]

نه اصلا اینطور نیست، من خودم از آیکون 128*128 هم استفاده کردم.


نه دوست عزیز به سایز آیکون ربطی نداره، شما حتی می تونی از آیکون 128*128 هم استفاده کنی.

نه جناب محسن 15 آيکن رو به برنامه نمياره و ارور ميده من خودم تست کردم ميتونيد امتحان کنيد.

موفق باشيد

[saeed7474]

نیازی نیست چون خود سیستم همین کار رو میکنه.
خب عزیز دل زودتر میگفتی اونقد کد کد ریسورس نمی نوشتم :کف::لبخند:

[SlowCode]

خب عزیز دل زودتر میگفتی اونقد کد کد ریسورس نمی نوشتم
وای ببخشید اشتباهی متوجه شده بودم. نمیشه اگه سیستم فونت شما رو پیدا نکنه از فونت خودش استفاده میکنه، مثلا tahoma

نه جناب محسن 15 آيکن رو به برنامه نمياره و ارور ميده من خودم تست کردم ميتونيد امتحان کنيد.

بفرمایید، توی این فرم از یه ایکون 128*128 استفاده کردم.

[saeed7474]

چطور به شما اجازه ایکونو میده به ما نه :لبخند::ناراحت:

[SlowCode]

چطور به شما اجازه ایکونو میده به ما نه :لبخند::ناراحت:
خوب دیگه!!!
خطای out of memory میده؟

[program2vb]

خیلی ممنون دوستان عزیز که کمک میکنید

برای کامپوننت ها ریسورس استفاده کردم

نمی دونم برای فونت هم همین امکان پذیره ؟ جای مسیر سیستم۳۲ کنترل پنل باید باشه ؟

دوست عزیز کدتنون برای ایکن کار نمیکنه ارور میده !

فونتها همیشه توی پوشه ویندوز داخل Fonts کپی میشن و از اونجا هم استفاده میشن فقط کافیه فونت مورد نظر رو کپی کنی تو این آدرس

C:\windows\Fonts و بقیه کارا خودش حل میشه بصورت اتوماتیک :لبخند:

کامپوننت ها هم باید در پوشه system32 کپی بشن تا اجرا بشن
پس اونا رو هم باید کپی کنی تو c:\windows\system32 تا اجرا بشن

البته بعضی از آنتی ویروس ها اجازه نمیدن که بعضی فایلها تو این پوشه کپی شن چون بخش اصلی ویندوز رو تشکیل میده .... بنابراین یکم باید با برنامه نویسی به زبان سی بلد باشی که توسط سی این کارو بکنی ..... فک نکنم پروزه شما آنتی ویروس گیر بده ..... موفق و پیروز باشی ... یا علی

راستی یه راهنمایی دیگه : با استفاده از این کد میتونی آدرس پوشه ویندوز رو پیدا کنی


Environ("windir")

و اینم آدرس پوشه programFiles رو میده بهت

Environ("programfiles")

یا علی

[M.T.P]

فونت هاتون می تونه کنار فایل اجرایی برنامه تون باشه و نیاز نیست حتما نصب کنید.

یه نمونه اینجا گذاشتم ببینید.

لینک (http://barnamenevis.org/showthread.php?294711-%DA%86%DA%AF%D9%88%D9%86%DA%AF%DB%8C-%D9%86%D8%B5%D8%A8-%DA%A9%D8%B1%D8%AF%D9%86-%D9%81%D9%88%D9%86%D8%AA-%D9%87%D8%A7-%D8%A7%D8%B2-%D8%B7%D8%B1%DB%8C%D9%82-%DA%A9%D8%AF%D9%86%D9%88%DB%8C%D8%B3%DB%8C&p=1294128&viewfull=1#post1294128)

[saeed7474]

خوب دیگه!!!
خطای out of memory میده؟
نه کلا ایکنو قبول نمی کنه !؟

[saeed7474]

؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

[SlowCode]

سلام
شاید حجم آیکن زیاده، اگه ممکنه آیکون خودت رو بده تا امتحان کنم.

[sina26]

دوست عزیز من کلا setup هامو با installshield میسازم و کار باهاش خیلی راحته و تا حال روی سایر سیستمها مشکلی نداشته ام

[saeed7474]

سلام
شاید حجم آیکن زیاده، اگه ممکنه آیکون خودت رو بده تا امتحان کنم.
ایکن خاصی ندارم . چند ایکن رو اومدم سایز 16-16 کردم و با پسوند ایکن
نمیدونم چرا میگه اینوالید ایکن

[SlowCode]

خب اگه invalid بگه حتما از آیکون 32bit استفاده کردی، تو پستهای اول گفتم حداکثر باید 24bit باشن.

[saeed7474]

خب اگه invalid بگه حتما از آیکون 32bit استفاده کردی، تو پستهای اول گفتم حداکثر باید 24bit باشن.
کیفیت منظورتونه

[SlowCode]

بله، شما باید با برنامه های ویرایش آیکون کیفیتش رو بیاری پایین. اگه تا حالا کار نکردی آیکونت رو بده تا برات درستش کنم.