[أبوبكر سويدان]

(19-06-19, 10:25 PM)سعود كتب : هل  لدى احدكم استعداد فتح موضوع لا نهائي

اقصد نظل نسال لين نفهم كل شيء.

بعد وضع الادوات كيف تكون التحققات؟
if then
لم استطع تطبيق جملة واحدة.

كود :

if a = 1 then
begin
   b:= a + 13;
   c:= a * b;
end
else if a = 2 then exit;

كود :

if trim(TUser_Name.Text) = '' then
begin
   Showmessage('User name is empty');
   TUser_Name.SetFocus;
Exit;
End;