![]() |
|
منتدى البرمجة كل ما يتعلق بلغات البرمجة، فيجوال بيسيك , سي ++ , دلفي , أكسيس , جافا , هتمل... |
في حال وجود أي مواضيع أو ردود
مُخالفة من قبل الأعضاء، يُرجى الإبلاغ عنها فورًا باستخدام أيقونة
( تقرير عن مشاركة سيئة )، و الموجودة أسفل كل مشاركة .
آخر المواضيع |
|
![]() |
|
أدوات الموضوع | انواع عرض الموضوع |
![]() |
رقم المشاركة : 1 | ||||
|
![]()
|
||||
![]() |
![]() |
رقم المشاركة : 2 | |||
|
![]() لا اعرف تلك اللغة كود:
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 مع احترام رايك في امان الله |
|||
![]() |
![]() |
رقم المشاركة : 3 | |||
|
![]()
|
|||
![]() |
![]() |
رقم المشاركة : 4 | |||
|
![]()
بسم الله الرحمن الرحيم 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 |
|||
![]() |
![]() |
رقم المشاركة : 5 | ||||
|
![]() اقتباس:
هل انت محترف لهده اللغة؟ |
||||
![]() |
![]() |
رقم المشاركة : 6 | |||
|
![]() جزاك الله خيراأنت ايضا انا لست محترفا لهذه اللغة وانما اقتبستها من دلفي |
|||
![]() |
![]() |
رقم المشاركة : 7 | |||
|
![]() merci ...... |
|||
![]() |
![]() |
رقم المشاركة : 8 | |||
|
![]()
|
|||
![]() |
![]() |
الكلمات الدلالية (Tags) |
builder, البرمجة |
أدوات الموضوع | |
انواع عرض الموضوع | |
|
|
المشاركات المنشورة تعبر عن وجهة نظر صاحبها فقط، ولا تُعبّر بأي شكل من الأشكال عن وجهة نظر إدارة المنتدى
المنتدى غير مسؤول عن أي إتفاق تجاري بين الأعضاء... فعلى الجميع تحمّل المسؤولية
Powered by vBulletin .Copyright آ© 2018 vBulletin Solutions, Inc