البرمجة ب c++ builder

[حمامة الجزائر]

السلام عليكم

1 - أرجوكم أنا محتاجة لدروس وأمثلة حول لغة البرمجة

c++ builder

2 - أريد برمجة برنامج بواسطة c++ builder حيث بواسطته أتحكم في تغير شريط اللغة

أرجوكم ساعدوني ، وشكرا مسبقا ,,,

سلام

[MHDM]

لا اعرف تلك اللغة

ان اردت مثالا ب VB.net

تفضلي عملت لك مثالا للتحكم باللغات طبعا اذا كانت مثبتة على جهازك

صورة المثال

http://im41.gulfup.com/wZwQQ.png
السورس مع المثال

http://www.gulfup.com/?nIVDRz


الكود

Public Class Form1
Public Declare Function ActivateKeyboardLayout Lib "user32" (ByVal HKL As UInt32, ByVal flags As UInt32) As UInt32
Public Const KLF_ACTIVATE = &H1
Public Const LANG_FR As UInt32 = &H40C
Public Const LANG_AR As UInt32 = &H1801
Public Const LANG_EN As UInt32 = &H409

Public Sub Changelangue(ByVal ******** As UInt32)
ActivateKeyboardLayout(********, KLF_ACTIVATE)
End Sub

Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

Changelangue(LANG_FR)

End Sub


Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Changelangue(LANG_EN)
End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Changelangue(LANG_AR)
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub
End Class

مع احترام رايك

في امان الله

[حمامة الجزائر]

السلام عليكم ,,,

شكرا أخي MHDM ، والله لقد أفرحتنا كثيرا ,, وخاصة الرد السريع ,,, جزاك الله كل خير ،،،

هذا ما أبحث عنه ، ولكن يا ليت لو كانت بلغة c++ builder

لأني لا أعرف لغة vb.net ،،

المهم أنت ربي يجازيك على ردك ، وألف شكر ,,,

دمتم في رعاية الله وحفظه ,,,,,

[طيباوي ابو علي1]

بسم الله الرحمن الرحيم

C++ Builder
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
// عربية
LoadKeyboardLayout("00000401",KLF_ACTIVATE); // Arabic
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
// انجليزية
LoadKeyboardLayout("00000409",KLF_ACTIVATE); // english
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button3Click(TObject *Sender)
{
// فرنسية
LoadKeyboardLayout("0000040c",KLF_ACTIVATE); // francie
}
//---------------------------------------------------------------------------

سي زائد زائد بويلدر
هذه اللغة حساسة لحالة الحروف
وهذه الدالة مكون من ثلاث كلمات وكل كلمة حرفها الاول كبير وهي :
Load
Keyboard
Layout

[خليل صلاح]

بسم الله الرحمن الرحيم

c++ builder
//---------------------------------------------------------------------------

void __fastcall tform1::button1click(tobject *sender)
{
// عربية
loadkeyboardlayout("00000401",klf_activate); // arabic
}
//---------------------------------------------------------------------------
void __fastcall tform1::button2click(tobject *sender)
{
// انجليزية
loadkeyboardlayout("00000409",klf_activate); // english
}
//---------------------------------------------------------------------------

void __fastcall tform1::button3click(tobject *sender)
{
// فرنسية
loadkeyboardlayout("0000040c",klf_activate); // francie
}
//---------------------------------------------------------------------------

سي زائد زائد بويلدر
هذه اللغة حساسة لحالة الحروف
وهذه الدالة مكون من ثلاث كلمات وكل كلمة حرفها الاول كبير وهي :
load
keyboard
layout

جزاك الله خيرا على المعلومة

هل انت محترف لهده اللغة؟

[طيباوي ابو علي1]

جزاك الله خيراأنت ايضا انا لست محترفا لهذه اللغة وانما اقتبستها من دلفي
دالة :
loadkeyboardlayout('00000401',klf_activate); // arabic

[SOMA@S]

merci ......

[حمامة الجزائر]

جزاكم الله كل خير ,,,

ألف شكر ليك أخي ، ben taib allaa

الرجاء من عنده أمثلة أخرى أن يضعها هنا حتى تتم الفائدة ,

ألف شكر ،،،

دمتم في رعاية الله وحفظه ,,,,