کامپوننت برای کار با html به شکل منوی ارسال پست یا تاپیک

[سید حمید حق پرست]

سلام علیکم
دوستان بنده یک برنامه دیدم که امکان نوشتن یک متن و دادن لینک به متن و بیشتر امکاناتی که در منوی ارسال پست یا تاپیک هست رو داره و مطمئن هستم با وی بی هستش .
توی سورس اسمبلیش خیلی دنبال اون کامپوننت گشتم اما اینقد کامپوننت با اسمهای عجیب غریب داشت که کلی وقت میخواست دونه دونه امتحان کنم
این کامپوننت به شکل زیر هست :

89964
امکان جالب دیگش این هست که میتونی یک فایل html درش بارگزاری کنیم و ذخیره کنیم

دوستان خیلی دنبالش گشتم اما پیدا نکردم ممنون میشم اگر اسمشو میدونید بگید یا خودشو قرار بدهید
شاید هم این کامپوننت بیشتر دوستان دیده باشن ولی من اولین بارم بود چون به فکرم نیومده بود تا اینکه دیدمش


یا علی (ع)

[IranVB]

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

[سید حمید حق پرست]

سلام علیکم
اسم برنامه که ...
ولی کامپوننت رو آخر پیدا کردم اما ورژن جدیدشه و رجستر کردن میخواد (پولیه)
اگر دوستان ورژن پایینش که تو عکس پست اول هست رو دارن ممنون میشم بزارن
اسم کامپوننت nBit WYSIWYG HTML Editor هست
این ورژنی که پیدا کردم ورژن 3.2.3 هست و ضمیمه کردم


یا علی (ع)

[سید حمید حق پرست]

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

یا علی (ع)

[Veteran]

بحث کارکردن با تگ های html هست
به ترتیب
بولد کردن
کج کردن
فونت بزرگ h2 سمت راست
فونت بزرگ h2 سمت چپ
فونت بزرگ h2

Private Sub Command1_Click()
Text1 = Replace(Text1, Text1.SelText, "<b>" & Text1.SelText & "</b>", , 1)
End Sub

Private Sub Command2_Click()
Text1 = Replace(Text1, Text1.SelText, "<I>" & Text1.SelText & "</I>", , 1)
End Sub

Private Sub Command3_Click()
Text1 = Replace(Text1, Text1.SelText, "<h2 Align=right >" & Text1.SelText & "</h2>", , 1)
End Sub

Private Sub Command4_Click()
Text1 = Replace(Text1, Text1.SelText, "<h2 Align=left >" & Text1.SelText & "</h2>", , 1)
End Sub

Private Sub Command5_Click()
Text1 = Replace(Text1, Text1.SelText, "<h2>" & Text1.SelText & "</h2>", , 1)
End Sub

[سید حمید حق پرست]

سلام علیکم
ممنون از شما دوست عزیز
این روش رو نمیگم (قبلا با این کار میکردم) منظور من اینه که وقتی مثلا به متن یک ادرس میدهیم تو خود تکستباکس اعمال میشه مثل قسمت پست جدید بلوگفا که هم قسمت نمایش بصورت کد داره هم به صورت html
که میتونی در قسمت html هم متنها و یا جداول رو ویرایش بدیم
کامپوننت بالا رو دانلود کنید بعد از استفاده در فرم اجرا کنید تا متوجه توضیحات بشید .
باز هم ممنون از توجهتون

یا علی (ع)

[محسن واژدی]

سلام علیکم
کنترل "MSHTML Html Editor ActiveX" موجود در ضمیمه زیر را بررسی کنید

قبل از بازکردن سورس، سه فایل:


MewsoftHtmlEditor.tlb
olelib.tlb
olelib2.tlb

را از فولدر TypeLibs در System32 کپی کنید



سورس اصلی برنامه را هم میتوانیم در صفحه زیر با نام "MSHTML Html Editor ActiveX" بیابیم (البته دارای کمبودها و مشکلاتی هست)

http://www.mewsoft.com/Downloads/


موفق باشید

[سید حمید حق پرست]

سلام علیکم
خیلی ممنون از شما جناب واژدی واقعا ممنونم:قلب:
فقط یه مشکل داره ارور میده که یک دی ال ال نداره اما اسمش نمیدونم ایا شما میدونید؟
دی ال ال تو کامپوننت استفاده شده
نمیزاره کامپوننت به فرم اضافه بشه (به خاطر دی ال ال هستش)
عکس :
90063

باز هم ممنونم


یا علی (ع)

[محسن واژدی]

فقط یه مشکل داره ارور میده که یک دی ال ال نداره اما اسمش نمیدونم ایا شما میدونید؟
دی ال ال تو کامپوننت استفاده شده
نمیزاره کامپوننت به فرم اضافه بشه (به خاطر دی ال ال هستش)
سلام علیکم
خواهش میکنم
یک فایل tlb در یکی از فولدرهای سورس برنامه هست آنرا در system32 کپی کنین یا به Reference اضافه کنید

موفق باشید

[سید حمید حق پرست]

سلام علیکم
باز جناب واژدی بنده رو شرمنده کردید . خیلی ممنونم
یک مشکل دیگه اینکه قسمت لینک دادن به متن یا عکس و قسمت عوض کردن رنگ متن و پس زمینه
لینک دادن به عکس و متن منظورم همون Hyper link که خودش HtmlEditor1.insert نوشته اما کامپوننت متود insert خالی رو نداره . هرچی هم گشتم متودی به نام insertHyperlink یا insertlink ندیدم
در مورد رنگها هم به Hex گیر میده . کدهاش که درست بود اما چرا گیر میده نمیدونم
ممنون میشم راهنمایی کنید


یا علی (ع)

[محسن واژدی]

سلام علیکم


لینک دادن به عکس و متن منظورم همون Hyper link که خودش HtmlEditor1.insert نوشته اما کامپوننت متود insert خالی رو نداره . هرچی هم گشتم متودی به نام insertHyperlink یا insertlink ندیدم

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



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

خطای وی بی به Hex و عدم درج رنگ ناشی از نبود برخی کتابخانه های مورد نیاز برنامه در reference بود که تقریبا همیشه اوقات یافت نشدن کامپوننت های reference موجود بروز خطاهای نامرتبط وی بی و گیردادن به سایر توابع داخلی میشود

کامپوننت اصلاح شده "MSHTML Html Editor ActiveX" را به همراه کلیه فایل های مورد نیازش ضمیمه پست 7 شد

موفق باشید

[سید حمید حق پرست]

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

یا علی (ع)

[محسن واژدی]

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

موفق باشید

[سید حمید حق پرست]

سلام علیکم
یک سوال داشتم
الان فرض کنید یک تکست باکس و یک دکمه به این سورس اضافه میکنیم و من میخوام کد اچ تی ام الی که در تکست باکس نوشتم بعد از زدن دکمه به کد HtmlEditor1 اضافه بشه
ممنون میشم راهنمایی کنید

یا علی (ع)

[محسن واژدی]

سلام علیکم

با متد InsertHTMLCode کدها را اضافه میکنم
متاسفانه بخاطر شرایط ویبولتن نتوانستم نمونه کد قرار بدهم

موفق باشید