[ahmad.roz]

السلام عليكم
عندى مشكلة فى اللغة وهى ان اللغة العربى فى التيكست والفروم تمام ولكن عند نسخ الكلام من التكست ولصقها فى اى مكان
مثل واتس اب او مسنجر او ملف نص بتظهر حروف روموز غريبة



https://imgur.com/CndegRJ

https://imgur.com/saLsXLf



ومظبط كل اعدادت اللغة



https://imgur.com/2KvnSLT

https://imgur.com/Ro6UhPv

[عابر سبيل 2]

قبل أن تنسخ حول لوحة المفاتيح للغة العربي ثم قم بالنسخ

[ahmad.roz]

الف مليوووووووووووووون شكر
ولكن مفيش كود يحولها قبل النسخ ؟

[عابر سبيل 2]

(26-08-18, 05:21 PM)ahmad.roz كتب : الف مليوووووووووووووون شكر
ولكن مفيش كود يحولها قبل النسخ ؟

أضف موديول وضع فيه هذا الكود

PHP كود :

Private Declare Function GetKeyboardLayoutName Lib "user32" Alias "GetKeyboardLayoutNameA" (ByVal pwszKLID As String) As Long
Private Declare Function LoadKeyboardLayout Lib "user32" Alias "LoadKeyboardLayoutA" (ByVal pwszKLID As String, ByVal flags As Long) As Long

Public Sub CopyUTF8ToClipboard(txt As String)
    Dim currKL As String: currKL = String(9, 0)
    GetKeyboardLayoutName currKL
    LoadKeyboardLayout "00000401", 1
    Clipboard.Clear
    Clipboard.SetText txt, vbCFText
    LoadKeyboardLayout currKL, 1
End Sub 


ثم في زر النسخ استخدم هذه الطريقة

PHP كود :

Private Sub Command1_Click()
    Call CopyUTF8ToClipboard(Text1.Text)
End Sub 


[ahmad.roz]

الف شكر ع المجهود

[عبدالله الصافي]

السلام عليكم ورحمة الله وبركاته

المشكلة عندي في لصق نص عربي في خانة نص برنامج فيجوال بيزك 6
فتظهر رموز غيرمفهومة مثل ؟؟؟؟

اي المشكلة عكس ما طرح الاخ الكريم
فهل من حل؟

شكرا لكم جزيلا

[عبدالله الصافي]

لم تنجح اخي تعطي ايضا علامات استفهام بد من الحروف العربي
اما مع الارقام والانجليزي شغال تمام