كيف اجعل مؤشر الكتابة يتموضع داخل Edite برمجيا

[ELARAPY]

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

لنفرض ان فورم يحتوي ListBox, Button, Edit وعند حدث الضغط على الزر يتم نسخ محتوى Edit الى ListBox فكيف اجعل مؤشر الكتابة يتموضع داخل Edit برمجيا بعد الضغط على الزر ؟

كود :

procedure TForm2.Button1Click(Sender: TObject); begin   ListBox1.Items.Add(Edit1.Text);   Edit1.Clear;   // ماذا اكتب هنا حتى اجعل مؤشر الكتابة يتموضع داخل مربع النص end;

[Delphi4Us]

كود :

Edit.setfocue

[ELARAPY]

E2003 Undeclared identifier: 'setfocue'

شكرا اخي الحبيب على سرعة الرد

يظهر خطأ عدم تعرف الدلفي على setfocue بحثت عنها فلم اجدها ضمن خصائص مربع النص

[larbiparadox]

E2003 Undeclared identifier: 'setfocue'

شكرا اخي الحبيب على سرعة الرد

يظهر خطأ عدم تعرف الدلفي على setfocue بحثت عنها فلم اجدها ضمن خصائص مربع النص

السلام عليكم كيف حال الاخ العربي

تصحيح : .SetFocus

[Delphi4Us]

ليس بالضبط ان لا دلفي عندي واكتب من وحي خيالي وقد اخطئ في الحروف العبارة الصحيحة

كود :

edit1.SetFocus

[ELARAPY]

E2003 Undeclared identifier: 'setfocue'

شكرا اخي الحبيب على سرعة الرد

يظهر خطأ عدم تعرف الدلفي على setfocue بحثت عنها فلم اجدها ضمن خصائص مربع النص

السلام عليكم كيف حال الاخ العربي

تصحيح : .SetFocus

وعليكم السلام ورحمة الله وبركاته , نحمد الله في فضل ونعمة من الله بارك الله فيك اخي الحبيب .

ليس بالضبط ان لا دلفي عندي واكتب من وحي خيالي وقد اخطئ في الحروف العبارة الصحيحة

كود :

edit1.SetFocus

ماشاء الله , احييك اخي الحبيب على المساعدة رغم لا دلفي امامك الان , أسأل الله لكم تمام التوفيق والمنه.

---

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

انا بحثت عن SetFocus لا هي من الخصائص ولا هي من الاحداث الخاصة ب Edit , فكيف لي ان اجدها بمجهودي بدون ان اضع اسئلة هنا وهناك .



قبل ان اتقدم بطلب المساعده فقد قمت بالمحاولة والنظر الى Properties الخاصة بالمكون Edit وايضا في ملف المساعدة فلم احصل على ما اريد فاضررت الى انشاء هذا الموضوع .

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

[zouaidahmed]

E2003 Undeclared identifier: 'setfocue'

شكرا اخي الحبيب على سرعة الرد

يظهر خطأ عدم تعرف الدلفي على setfocue بحثت عنها فلم اجدها ضمن خصائص مربع النص

سلام اخي لقد اخطائة في الكتابة فقط[size=small] .SetFocus[/size]

[larbiparadox]

بالنسبة لـ Edit هي تابعة لمكون Vcl.StdCtrls أدرجه إلى uses حتى يعمل جيدا ربما أنت في DataModule و هي تأتي بدونها

[sofiane201]

انا بحثت عن SetFocus لا هي من الخصائص ولا هي من الاحداث الخاصة ب Edit , فكيف لي ان اجدها بمجهودي بدون ان اضع اسئلة هنا وهناك .



قبل ان اتقدم بطلب المساعده فقد قمت بالمحاولة والنظر الى Properties الخاصة بالمكون Edit وايضا في ملف المساعدة فلم احصل على ما اريد فاضررت الى انشاء هذا الموضوع .

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

التابع SetFocus موجود فهو للكلاس TWinControl الذي ترثه أغلب المكونات المرئية, إذا لم تجده فالمشكل من عندك.

وإذا أردت أن تجدها بمجهودك كما قلت, فالرصيد الانجليزي مفيد جدا, لكثرة المواقع والمنتديات التي باللغة الانجليزية, فعند البحث بالعربية تكون النتائج أقل مما ستجده بالأخرى, وحتى محرك البحث غووغل يعينك إن اخطأت في مصطلح انجليزي فهو يبحث أحيانا بالمفردات بدل الكلمة ذاتها.