delphi4arab منتديات دلفي للعرب

نسخة كاملة : كيف يمكنني منع المؤشر من الخروج من tedit
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم
كيف يمنع المؤشر من خروج من خانة tedit
وذلك لسبب القيمة المدخلة
يمكنه الخروج في حالة أن القيمة المدخلة تخضع لبعض الشروط
وشكرا
لقد وجدت الكود المناسب

كود :
Edit1.Setfocus;
السلام عليكم

في الحدث OnExit يتم التحقق ومنع المؤشر من الخروج منه

كود :
procedure TForm1.Edit1Exit(Sender: TObject); begin if Trim(Edit1.Text) = '' then Edit1.SetFocus; end;