مشكلة في الكود دالفي

[salim489]

السلام عليكم اردت صنع دليل الهاتفي الخاص بالولايات ووضعت combobox و label1  وهذا هو الكود

PHP كود :

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
 if ComboBox1.text='adrar' then

 begin
Label1.caption:=('049 36 46 40/049 36 46 ');
  end
else if ComboBox1.text='chlef' then

 begin

Label1.Caption:= ('027 77 24 00');

 end;
 end;

end. 


[محمد عبد العزيز]

وعليكم السلام ورحمة الله
لم توضح ما المشكل ؟

[salim489]

وعليكم السلام المشكل اني صنعت برنامج ارقام هاتف الولايات وعندما اعرض اي ولاية يعطيني نفس الرقم

[محمد عبد العزيز]

جربت الكود فوق ويعمل عادي

[salim489]

لكن يعررض نفس رقم الهاتف

[محمد عبد العزيز]

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

[salim489]

---

---

هل فهمت قصدي

[salim489]

المشكل في الدالة if

[AX302]

السلام عليكم 
لتفادي التكرار الممل للشرط if يمكنك عمل Table فيه ارقام الولايات و combobox فيه ارقام الولايات بالترتيب كما في المثال

[merouane]

حذار من الفراغات آخر الكلمة.
استعمل 
 if lowercase(trim(ComboBox1.text))='adrar' then