+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف يتم الإتنقال إلى خانه معينه في الكود بمجرد الضغط على Enter ؟ (/showthread.php?tid=7112)
كيف يتم الإتنقال إلى خانه معينه في الكود بمجرد الضغط على Enter ؟ - ALG2009 - 29-07-2015
السلام عليكم
الكثير يعلم أنه عند كتابه كود البحث في Edit.text تبدأتظهر النتائج بمجرد كتابه الحرف الأول ولكن عند إكمال الكتابه تحول الكريسور إلى خانه فارغه في الفورم بمجرد إيجاد الشخص المرااد البحث عليه والضغط على Enter
مثلا
Edit.text هذا الحقل الذي تكتب به حروف البحث وكما قلنا سابقا بمجرد كتابه الحرف الأول يبدأ بالفلتره أي إظهار الأسماء التي تبدأ بذلك الحرف وهذا مع بقيه الحروف الثاني والثالث
والأسماء تظهر في DBedit خاص بالإسم والآخر خاص ب اللقب
وبمجرد الضغط على Enter يذهب إلى DBedit الخاص بتاريخ الميلاد
كيف يكون الكود وجزاكم الله خيرا
كيف يتم الإتنقال إلى خانه معينه في الكود بمجرد الضغط على Enter ؟ - rahiche - 30-07-2015
اضن انك الاخ كمال
لان هذا السؤال مر علي البارحة
و اذا لم تكن فالمعذرة و الجواب هو
في حدث Onkeypressup الخاص بالمكون الذي تريد الانتقال منه و هو هنا في حالتكEdit اكتب
if (Key = #13) then و هو الذي يتحقق اذا ضغطت على الزر دخول فاذا كان نعم
dbedit2.setfocus; اي ضع المؤشر على المكون لكي تكتب عليه مباشرة
كيف يتم الإتنقال إلى خانه معينه في الكود بمجرد الضغط على Enter ؟ - ALG2009 - 31-07-2015
جزاك الله خيرا أخي
أنا لست الأخ كمال
كما أسأل في نفس الموضوع في الأكسس يمكن التنقل بين Edit بجرد التقر على زر Enter
;dlmkm jvjdf hgohkhj flukn uk$ hgayù ugn ُىفثق يذهب إلى Edit 1 ثم Edit2 ووو حسب ما أمرته به اي على حسب الترتيب الذي وضعته أين أجد هذه الخصيه
كيف يتم الإتنقال إلى خانه معينه في الكود بمجرد الضغط على Enter ؟ - rahiche - 01-08-2015
كلامك غير مفهوم
كيف يتم الإتنقال إلى خانه معينه في الكود بمجرد الضغط على Enter ؟ - ferrero - 03-08-2015
OnKeyPress
--------------
كود :
if (Key = #13) then
begin
Key := #0;
Perform(WM_NEXTDLGCTL, 0, 0);
end;كيف يتم الإتنقال إلى خانه معينه في الكود بمجرد الضغط على Enter ؟ - S.FATEH - 03-08-2015
السلام عليكم
للانتقال حسب tab order
غير خاصية KeyPreview للـ Form الى True
في حدث OnKeyPress للـ Form
PHP كود :
procedure TForm2.FormKeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then
SelectNext(ActiveControl, True, True);
end;
في حدث OnKeyPress للـ Edit1
PHP كود :
procedure TForm2.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
Edit2.SetFocus;
end;