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

السلام عليكم ورحمة الله وبركاته
أولا عيد أضحى مبارك على الجميع أما بعد

عيد edit محدد عدد الأحرف بـ: 08 أحرف واستخدمه للبحث بهذه الصيغة
123/2014
أرغب أن أجعل الرمز / ثابت داخل edit أي عند البحث ما عليك إلا كتابة الأرقام حيث عندما يكتب
123 ينتقل مباشرة إلى كتابة 2014 دون كتابة الرمز / لأنه مثبت داخل edit

وعليكم السلام
في الحدث OnChange ضع شيء مثل

PHP كود :
procedure TForm1.Edit1Change(Sender: TObject);
begin
  if Length(Edit1.Text) = 3 then
  begin
    Edit1.Text := Edit1.Text + '/';
    Edit1.SelStart := 4;
  end;
end; 

السلام عليكم

المكون الأنسب لحالتك هو الـ MaskEdit مع الـ InputMask = ####/###

السلام عليكم
كما قال لك الاخ
في قائمة Inspecteur d'objet ستجدEditMask انقر و ضع هذا الكود

كود :
!999/9999;1;_

في Masque

شكرا لكم وبارك الله فيكم على الرد

جعلها الله في ميزان حسناتكم

cyberhani

Agmcz

S.FATEH

paix144

cyberhani