jeqele

سوال من همچنان بی جوابه.... مدیرا رسیدگی کنن *خنده شیطان

سلام عزیز دل کتابخانه ICOSStrings رو فعال کن. از این کد اگه به کارت اومد استفاده کن. Sub test If EditText1.Length > 76 Then Dim Ics As ICOSStrings Dim s As String s = EditText1.text Do While s.Length < 72 s = Ics.StrLeft(s, 72) 'Sending SmS process... s = Ics.StrRight(s, s.Length - 72) Loop 'Sending SmS process... Else 'Sending SmS process... End If End Sub به جای این خط کد روند ارسال اس ام استو بزار 'Sending SmS process... کارش اینه که متنتو 72 کاراکتری بخش می کنه. امیدوارم کار کنه.

یه if بزار اگه از 72 کاراکتر بیشتر بود 72 تای اولو تو یه اس ام اس بفرسته بعدی ها رو جدا. گوشی های قدیمی هم یه تنظیماتی داشت همین کارو می کرد.*خنده*

دوستانی که دنبال ساختن سرچ هستن یه نگاهی به کتابخانه ABSimMetrics بندازن. خیلی کاربردیه. با چندین الکوریتم مشابهات رو پیدا می کنه. حتی درصد تشابه رو میشه مشخص کرد. خودم هنو ازش استفاده نکردم که بدونم آیا با فارسی هم درست کار میکنه یا نه اگه کسی کار کرد به منم خبر بده درست بودنشو.

برنامه رو گذاشتم تو سایت اینجا http://answercenter.ir/showthread.php?t=255&p=1046#post1046 تو صفحه ی نقشه فسمتی که مارکر ها میاد میتونید مشکلو ببینید.

سلام. یه پروژه جی پی اس برداشتم تمومش هم کردم، فقط مونده یه چیز اونم اینه که وقتی مثلا تو بالون یه مارکر رو نقشه که تایتل رو نشون میده - مثلا بانک ملی مرکزی - چون فارسیه بالون سمت راست متن رو خالی میزاره در عوض یه بخشی از سمت چپ متن رو نشون نمیده..... البته می دونم که با فاصله اضافه کردن به طرفین متن، میشه یه کارایی کرد اما دنبال یه راه حل اصولیم.