ذخیره تغییرات برنامه

[xrezax]

دوستان من می خوام وقتی کاربر یک سری تغییرات درش انجام داد بتونه یک خروجی بگیره و با یک پسوند خواص ذخیرش کنه و یک ایکن خواص (خواص یعنی از قبل پسوند و آیکن براش تعریف کردم) بهش بده. که هر جا برنامه نصب بشه آیکنش و فایلش و پسوندش برای کاربر معلوم باشه.

[بهروز عباسی]

دوستان من می خوام وقتی کاربر یک سری تغییرات درش انجام داد بتونه یک خروجی بگیره و با یک پسوند خواص ذخیرش کنه و یک ایکن خواص (خواص یعنی از قبل پسوند و آیکن براش تعریف کردم) بهش بده. که هر جا برنامه نصب بشه آیکنش و فایلش و پسوندش برای کاربر معلوم باشه.
اگه منظورت رو فهمیده باشم میخوای برنامت یه ادیتور باشه و فایل های هه که ساپرت میکنه آیکن مخصوص خودشون رو داشته باشن

مثلاً مثل vb که پروژه هاش یا فرم هاش آیکن مخصوص دارن

منظورت این بود

[xrezax]

آره همین. پسوند مخصوص + ایکن مخصوص

[محسن واژدی]

سلام
تاپیک زیر را بررسی کنید:
http://barnamenevis.org/showthread.php?284968-اختصاص-دادن-یک-آیکن-به-پسوند-فایل-مورد-نظر

همچنین تاپیک زیر هم شاید مفید باشد:
http://barnamenevis.org/showthread.php?275326-قرار-دادن-برنامه-به-صورت-پیش-فرض

موفق باشید

[xrezax]

بدردم نخوردن.
می خوام از برنامم خروجی بگیرم و تغییرات رو ذخیره کنم و با پسوند test.nm3 ذخیرش کنم و آیکنشم تغییر بدم.
و هر فایلی با این پسوند ایکنشون عوض بشه

[محسن واژدی]

بدردم نخوردن.
می خوام از برنامم خروجی بگیرم و تغییرات رو ذخیره کنم و با پسوند test.nm3 ذخیرش کنم و آیکنشم تغییر بدم.
و هر فایلی با این پسوند ایکنشون عوض بشه
سلام
چرا؟! ضمیمه پست شماره #9 تاپیک زیر که در پست قبل هم به آن اشاره کردم، کلا به ثبت یک پسوند جدید در ویندوز اختصاص دارد:
http://barnamenevis.org/showthread.php?284968-%D8%A7%D8%AE%D8%AA%D8%B5%D8%A7%D8%B5-%D8%AF%D8%A7%D8%AF%D9%86-%DB%8C%DA%A9-%D8%A2%DB%8C%DA%A9%D9%86-%D8%A8%D9%87-%D9%BE%D8%B3%D9%88%D9%86%D8%AF-%D9%81%D8%A7%DB%8C%D9%84-%D9%85%D9%88%D8%B1%D8%AF-%D9%86%D8%B8%D8%B1&p=1256998&viewfull=1#post1256998

در مورد ذخیره تغییرات میتوانید اطلاعات تنظیمات برنامه را به هرصورتیکه مایل بودید ترتیب بندی و ذخیره کنید، و با سورس موجود در لینک بالا هم پسوند فایل را در ویندوز ثبت کنید

موفق باشید

[xrezax]

اررور می ده. میشه چکش کنی و درستشو واسم بزاری

[محسن واژدی]

اررور می ده. میشه چکش کنی و درستشو واسم بزاری

چه خطایی میدهد؟، سورس را هم که تست کردم بدون هیچ مشکلی عمل میکرد.

[xrezax]

اررور می ده.



Sub Main()
On Error Resume Next
Set MainForm = New Form1
MainForm.Show
If Command <> "" Then
Form1.rtfText.LoadFile Command
s = Command
d = InStrRev(s, ".")
Form1.Caption = Left(s, d - 1)
Else
ConnectExtsToMe "medoc", App.Path & "\icon1.ico"
ConnectExtsToMe "txt", App.Path & "\icon2.ico"
ConnectExtsToMe "rtf", App.Path & "\icon3.ico"
End If
End Sub

این قسمت. به این rtfText.LoadFile

[محسن واژدی]

بله، چون در ابتدا این سورس برای یک ویرایشگر ساده متن نوشته شده بود این روال در زمانی که فایل مورد نظر در برنامه باز میشد فایل را در شی RichTextBox باز میکرد،
چون این قسمت در برنامه اصلی تاثیری ندارد میتوانید اونو حذف کنید

موفق باشید