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

نسخة كاملة : مافائدة التصريح procedure بهاته الطريقة ؟
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله وبركاته

لحظ هدا الجزء العام :



PHP كود :
type
    TMyMsg 
= class
        protected
            
Fmsg: String;
            
Frnum : Integer ;
        public
            class 
procedure WriteMsg(N : integer ;S : String);
    
end; 

الان لحظ هدا التصريح للاجراء :

PHP كود :
class procedure WriteMsg(N : integer ;S : String); 

و جسم الاجراء :

PHP كود :
Class procedure TMyMsg.WriteMsg(N : integer ;S : String);
            
begin
                 with Create 
do
                     try
                       
Fmsg := S;
                       
Frnum := N ;
                    finally
                        
Free;
                 
end;
            
end; 

السؤال :

ما فائدة من اضافة هده الكلمة Class [COLOR="Purple"]عند التصريح بالاجراء ؟
[/COLOR]
ما الفرق بينها وبين الطريقة السابقة اقصد التصريح بدون وضع الكلمة Class ؟؟

ماهي الاسباب التي تجبرني على استعمال هاته الطريقة دون الاخرى ؟؟؟

بارك الله فيكم وعليكم وحفظكم من المصائب

بالتوفيق للجميع

سلامي وحبي لكم اخواني

في امان الله
و عليكم السلام
اظن اضافة الكلمة Class قبل Procedure للتعريف باجراء لديه نفس خصائص الكلاس (class methode)
ك Creat , Destroy ....
وكدلك لاستعمال المتغيرات الموجودة في القسم المحمي
PHP كود :
Fmsg: String;
 
Frnum : Integer ; 
من طرف كلاسات اخر من خلال الاجراء WriteMsg

و الله اعلم
و عليكم السلام و رحمة الله و بركاته
New Delphi Language Features Sinse Delph 7
بالتوفيق,,
وعليكم السلام ورحمة الله وبركاته
راجع:
http://www.delphi4arab.net/forum/showthr...p?tid=2182
بالتوفيق.
وضع كلمة Class قبل ال Method معناه Static methods في اللغات الأخرى

أي أنه يمكنك إستخدام بشكل مباشر عن طريق الصنف ودون الحاجة إلى عمل نسخة منه في الذاكرة

والإستعداء يتم مباشرة هكذا

PHP كود :
TMyMsg.WriteMsg(1,'A') 

بدلاً من تعريف Object من الكلاس ومن ثم عمل له Create وبعد ذلك استخدام الإجراء السابق