اللّهُمَّ کُنْ لِوَلِیِّکَ الْحُجَّةِ بْنِ الْحَسَنِ صَلَواتُکَ عَلَیْهِ وَعَلى آبائِهِ فی هذِهِ السّاعَةِ وَفی کُلِّ ساعَةٍ وَلِیّاً وَحافِظاً وَقائِدا ‏وَناصِراً وَدَلیلاً وَعَیْناً حَتّى تُسْکِنَهُ أَرْضَک َطَوْعاً وَتُمَتِّعَهُ فیها طَویلاً

کمیابترین کدهای جاوا


این وب سایت را صفحه خانگی خود کن ! این وب سایت را به لیست علاقه مندی های خود اضافه کنید ! کار این تابع عوض کردن زبان صفحه کلید انگلیسی=فازسی - بوی عطر بهار نارنج
X
تبلیغات
رایتل
سه‌شنبه 22 مرداد‌ماه سال 1387 ساعت 03:27 ب.ظ

API شماره 3 : کار این تابع عوض کردن زبان صفحه کلید از انگلیسی به فارسی و بر عکس

Language Bar

این تابع را درون یک ماژول بنویسید :

Public Declare Function

LoadKeyboardLayout Lib "user32" Alias "LoadKeyboardLayoutA" (ByVal pwszKLID As String, ByVal flags As Long) As Long

pwszKLID

: این متغییر رشته 9 رقمی است که کد زبان رو مشخص میکنه.

flags

کد دکمه تبدیل زبان به فارسی :

: مقدار این متغییر برابر (1) خواهد بود.

(StrLocId = LoadKeyboardLayout("00000429", 1

()Private Sub Command1_Click

End Sub

کد دکمه تبدیل زبان به انگلیسی :

(StrLocId = LoadKeyboardLayout(vbNull, 1

()Private Sub Command2_Click

End Sub

del.icio.us  digg  newsvine  furl  Y!  smarking  segnalo
bache tabas 's Search Engine : FunnyLogo.info : Personal Search Engine with many styles Yahoo

 

Web ImagesVideoNewsMapsBooks More»
 
 Advanced Search
 Preferences
 Language Tools


BookMark     Create your own Search Engine Now


FunnyLogo is not affiliated with Google Inc.
Trademarks remain trademarks of their respective companies.
© 2008 FunnyLogo

Sedo - Buy and Sell Domain Names and Websites project info: funnylogo.info Statistics for project funnylogo.info etracker® web controlling instead of log file analysis