كيف أختصر هته القيمة

[فارس المطر]

السلام عليكم

كيف أختصر هته القيم لتصبح رسالة واحدة فقط وشكرا

كود :

if trim(edit2.Text) ='' then ShowMessage('Sil vous plaît ') ; if trim(edit3.Text) ='' then ShowMessage('Sil vous plaît ') ; if trim(edit4.Text) ='' then ShowMessage('Sil vous plaît ') ;

[gheislam]

ممكن توضيح اكثر في السؤال ؟؟

[Agmcz]

كود :

if (Trim(Edit2.Text) = '') and (Trim(Edit3.Text) = '') and (Trim(Edit4.Text) = '') then ShowMessage('Sil vous plaît ');

[فارس المطر]

ممتاز أخي شكرا
اختصار صحيح ورائع