Quick Smile 2 رو دانلود كنيد و از امكاناتش لذت ببريد!!

[AsefSoft]

خب حالا كه محفل برنامه نويسيه و اساتيد ارجمند هم هستند من علي الحساب 2 تا سوال ميپرسم تا مشكلات كوچيكش رو رفع كنم.
1- من وقتي از داخل كد برنامه متن فارسي رو كپي ميكنم كلا متن بهم ميريزه و غير قابل استفاده ميشه مثلا:
Çíæá ÈÇÈÇ Îíáí ÎÇÑÌí ÈæÏ
بايد چه كار كنم تا اين مشكل نباشه؟

2- من آخرش هم متوجه نشدم كامپوننت mscomctl.ocx به صورت پيش فرض در ويندوز اكس پي قرار داره يا نه؟ چون من اينو داخل ستاپ قرار ندادم و بعضي ها كه دريافت كردن گفتن كه برنامه كار نكرد و اينو ميخواست... و اين خيلي بد شد هم براي كسي كه برنامه رو گرفته و هم براي من!
كلا هميشه با اين مساله مشكل دارم.

[Mohamad_VB]

بابا ايول ! نميدونم چي بگم؟؟!!

[kamran11958]

اقا راجب سوال دومت نه اين فايل رو بايستي تو ستاپ بزاري چون رو كامپيوترها به صورت پيش فرض نيست.
راستي از Html Object Library استفاده شده؟:!

[AsefSoft]

محمد جان خواهش :oops: شرمنده ميكني

كامران جان اولا به خاطر معرفي در سايتت ممنون البته من نميتونم ببينمش نميدونم چرا باز نميشه!
اون ocx رو هم داخل ستاپ قرار دادم چون ديدم خيلي ها باهاش مشكل دارن
در مورد Html Object Library هم دقيقا منظورت كجا هست؟ من از اين كامپوننت استفاده نكردم از يكسيري توابع براي ايجاد كليپ برد HTML استفاده كردم

سوال اول رو كسي جواب نميده؟ كار كردن به صورت يونيكد و ...[/list][/list]

[kamran11958]

سلام
ببين اين تابع رو ازمايش كن

کد:

Public Function UNICODE(PREREP As String)
DoEvents
REPIT$ = ""
For p = 1 To Len(PREREP)
REPIT$ = REPIT$ & Chr(0) & Mid(PREREP, p, 1)
Next p
UNICODE = REPIT$
End Function

در ضمن منظورم براي فرستادن متون به تكست باكس ها و فيلدها بود كه از چه روشي استفاده كردي.

[kamran11958]

سلام
ببين اين تابع رو ازمايش كن

کد:

Public Function UNICODE(PREREP As String)
DoEvents
REPIT$ = ""
For p = 1 To Len(PREREP)
REPIT$ = REPIT$ & Chr(0) & Mid(PREREP, p, 1)
Next p
UNICODE = REPIT$
End Function

در ضمن منظورم براي فرستادن متون به تكست باكس ها و فيلدها بود كه از چه روشي استفاده كردي.
راستي فارسي نويسيش مستقل از ويندوزه؟!

[mehdvirus]

اصف جان شما اون متن رو تو يه تكيت باكس بنويس و اينويسيبل كن و هرچي رو كه ميخواي مساوي تكست باكس قرار بده
فكر كنم مشكلت حل شه :wink:

[Toxic_Program]

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

[AsefSoft]

سلام
ببين اين تابع رو ازمايش كن
كد:

...

در ضمن منظورم براي فرستادن متون به تكست باكس ها و فيلدها بود كه از چه روشي استفاده كردي.

1- نه اين جواب نميده.
2- هرچند كه خيلي امنيتيه ولي من ميگم از Paste

اصف جان شما اون متن رو تو يه تكيت باكس بنويس و اينويسيبل كن و هرچي رو كه ميخواي مساوي تكست باكس قرار بده
فكر كنم مشكلت حل شه

مهدي جان منظورتون رو متوجه نشدم
ببينيد من كار خاصي براي اين قسمت از برنامه (فعلا) انجام ندادم. يه تكست باكس گذاشتم و فونت اون رو تاهما قرار دادم و تنظيم Script فونت رو قرار دادم Arabic. حالا متن داخل تكست باكس رو كپي ميكنم به كليپ برد ولي اين متن كپي شده با فارسي مشكل داره!
با يكي آشنا هاي برنامه نويسم كه صحبت ميكردم ميگفت بايد از كنترل هاي يونيكد استفاده كني و ... و ايشون در سي بيلدر منظورشون بود و تجربه داشتند ولي در وي بي هنوز وقت نكردم پيشو بگيرم.
ميخواستم ببينم الان بايد چه كار بكنم. يه بحثي روش بشه خوبه

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

چجوري؟ بزار ببينم! نه شاخم ندارم كه!
باتوجه به استقبال خوبي كه ازش شد فقط دعا كنيد پهناي باند كم نياريم كه خيلي بد ميشه. البته من فكر اينجاشم تاحدودي كردم

[ashkan]

اگه يوني كد ميخوايي بايد از كامپوننت هاي اون استفاده كني كه البته من نتونستم ازشون استفاده كنم . ببين اين برنامه بدردت ميخوره يا نه.
http://www.iranvig.com/modules.php?name=...=0&thold=0

[AsefSoft]

بچه ها چه خبر؟ معلومه ازش استفاده نميكندا!