كيف نتجنب اخطاء النظام

[bassem_43]

السلام عليكم بارك الله فيك يا اخي لكن بالنسبة ل try ...expect.....finaly
فقد جربتها على دلفي7 لكن لم تعمل لو تعلمني في اي حدث بالضبط اكتبها

اليك مثال عن قسمة اعداد صحيحة رسالة الخطا تظهر عند القسمة على صفر
ضع زر و ثلاث edit وفي حدث الضغط على الزر تضع هدا الكود جرب وسترى النتيجة

PHP كود :

procedure TForm1.Button1Click(Sender: TObject);
begin
try
  Edit3.Text:= floattostr((strtofloat(Edit1.Text))/(strtofloat(Edit2.Text)));

except
 showmessage('القسمة على الصفر مستحيلة');
end;
end; 


بالتوفيق