PDA

View Full Version : زبان ویندوز



تبار
پنج شنبه 20 آذر 1382, 00:26 صبح
سلام

آیا راهی می شناسید که بشود مستقیما زبان ویندوزی مثل پارسا را بدون آنکه کاربر ALT +Shift راست را فشار دهد فارسی کرد ؟
یا آنکه این کلیدها را شبیه سازی کرد؟

ساران سافت
پنج شنبه 20 آذر 1382, 10:10 صبح
بهتر است کلاً اول جستجو کنید اگر نیافتید بعد تاپیک بگذارد:
من قبلا هم این را آپ لود کرده ام

تبار
جمعه 21 آذر 1382, 02:07 صبح
متشکرم . البته ما جستجو کردیم ولی شاید کم بوده ! :cry:

Hossein Bazyan
پنج شنبه 17 اردیبهشت 1383, 23:12 عصر
سلام
از راه API میشود اگر هنوز هم لازم داری تابع و یک‌مثال را برات ارسال نمایم

تبار
جمعه 18 اردیبهشت 1383, 01:30 صبح
بد نیست بدانم و ممنون اگر بگویید. :)

بابک زواری
جمعه 18 اردیبهشت 1383, 11:59 صبح
دوست عزیز این سوال بارها جواب داده شده اگه یکم میگشتی حتما پیدا میکردی اینم جواب
Option Explicit
Declare Function LoadKeyboardLayout Lib "user32" Alias "LoadKeyboardLayoutA" (ByVal pwszKLID As String, ByVal flags As Long) As Long

Public Sub KeyboardFarsi()
Dim x As Long
x = LoadKeyboardLayout("00000401", 1)
End Sub

Public Sub KeyboardLatin()
Dim x As Long
x = LoadKeyboardLayout("00000409", 1)
End Sub

rezaTavak
جمعه 18 اردیبهشت 1383, 15:13 عصر
سلام

البته توی ویندوز XP به جای کد 401 از 423 که فارسی است استفاده کنید.

Hossein Bazyan
شنبه 19 اردیبهشت 1383, 21:05 عصر
تابعی راکه من استفاده میکنم همان تابعی است که آقای کد نویس نوشته است .