PDA

View Full Version : فارسی



probit
سه شنبه 01 شهریور 1384, 10:06 صبح
با استفاده از PersianDateSupport.dll تاریخ میلادی را به شمسی تبدیل کردم خروجی این کلاس صحیح ولی بصورت انگلیسی است اگر بخواهم آنرا فارسی کنم چکار باید کرد
مثلاً تاریخ امروز 01/06/1384 باشد

Hamedm
سه شنبه 01 شهریور 1384, 11:43 صبح
http://www.barnamenevis.org/forum/showthread.php?t=26688

probit
سه شنبه 01 شهریور 1384, 15:58 عصر
شاید سؤالم را درست نگفته باشم
این dll تاریخ میلادی را به شمسی تبدیل می کنه و هیچ مشکلی نداره
چون در اینجا عدد را نمی توان به انگلیسی نوشت منظور خودم را در این عکس می آورم

VisualBasic-NET
سه شنبه 01 شهریور 1384, 16:55 عصر
با سلام
فکر میکنمکه شما اگر فونت textbox یا شعی که از آن استفاده میکنید را عوض کنید و فوت فارسی بزارید مشکل شما حل می شود . از فونتهای که مانند B Homa می باشد استفاده کنید

zarrin_306
چهارشنبه 02 شهریور 1384, 03:14 صبح
با سلام
شما میتوانیداز کد زیر اتفاده کنید
1 ابتدا فونت مورد نظر راانتخاب کرده zar-s
2 بعد دکمه(.) بجای (/) نشان داده میشود
3 حال نوبت کد است
بطور مثال
نام dll یا ocx ما axmain1 میباشد
button1
label1.text=axmainu1.cyear & axmainu1.cmonth & axmainu1.cday
من امتحان کردم درسته
امیدوارم مورد استفاده قرار بکیرد
زیر سایه امام عصر موفق باشید
zarrin_306@lycos.com

probit
چهارشنبه 02 شهریور 1384, 10:10 صبح
این فونت ها در fontdialog نیست ده شکلی باید أنها را اضافه کنم؟

rezanew
چهارشنبه 02 شهریور 1384, 16:36 عصر
ببینید دوست عزیز اگه شما بخواهین که این تاریخ رو توی یه Textbox نمایش بدین کافیه خاصیت RightToLeft اونو True کنید اون وقت خود به خود فارسی نشون داده میشه اما اگه نه می خواهین کلا به این شکل باشه از تابع زیر استفاده کنین



Function E2F(ByVal str AsString) AsString

Dim strch() AsChar = str.ToCharArray

Dim ch AsChar

Dim Rstr AsString = ""

ForEach ch In strch

If AscW(ch) >= 48 And AscW(ch) <= 57 Then

Rstr += ChrW(AscW(ch) + 1728)

Else

Rstr += ch

EndIf

Next

Return Rstr

EndFunction



این تابع 1383/05/06 را به ۱۳۸۳/۰۵/۰۶ تبدیل می کند

البته لازم به ذکر است اگه بخواهین خروجی را در بانک اطلاعاتی ذخیره کنید نمی تونید با وارد کردن عدد معمولی اونو Search کنید بلکه باید اول تبدیل کنید بعد استفاده کنید

zarrin_306
پنج شنبه 03 شهریور 1384, 01:56 صبح
این فونت ها درون فونت های office97 یا office2003میباشند
اگر نشد میل بزن جوابت رو با فونت ها میفرستم
zarrin_306@lycos.com

probit
پنج شنبه 03 شهریور 1384, 16:37 عصر
مرسی از جوابهایی که دادید مشکل من حل شد
tanks