البابي والهادم في لغة ما من لغات البرمجة constructor و destructor
دلفي تعليم :: منتديات البرمجة :: دلفي
صفحة 1 من اصل 1
البابي والهادم في لغة ما من لغات البرمجة constructor و destructor
البابي والهادم في لغة ما من لغات البرمجة constructor و destructor
مثلا في دلفي
المثاال التالي يوضح كيف نعمل فئة توضح ذلك
person = class
private // محلي
inti1: integer; // الحقل الاول عدد صحيح
strs1: string; // الحقل الثاني
public /// عام
constructor Create(str1: string); // الباني
procedure setsem(i1: integer); // الهادم
function getsem():integer;
destructor Destroy;
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
{ person }
constructor person.Create(str1: string);
begin
strs1 := str1; // اول قيمة يتم ارسالها
Dialogs.ShowMessage(strs1); // ظهورها في رسالة
end;
destructor person.Destroy;
begin
strs1:=''; // مسح القيمة
setsem(0); // جعل القيمة 0
beep; // صوت
end;
function person.getsem: integer;
begin
Result := inti1; // ارجاع القيمة المرسلة
end;
procedure person.setsem(i1: integer);
begin
inti1 := i1; // القيم مرسلة
end;
procedure TForm1.Button1Click(Sender: TObject);
var p1: person;
begin
/// القيمة التي ترسل عند انشاء الكائن
p1 := person.Create(' Create Object '); /// انشاء الكائن
try
p1.setsem(10); // ارسال قيمة
caption:=inttostr(p1.getsem);
finally
p1.Destroy;
end;
end;
ملاحظة:
private يتم الوصول اليه من الفئة فقط
public يتم الوصول اليه من الفئات المشتقة و التي يتم فيها نشاء الكائن
djelal- مبرمج مجتهد
- عدد المساهمات : 157
تاريخ التسجيل : 29/04/2015
مواضيع مماثلة
» البابي والهادم في لغة ما من لغات البرمجة
» ماهي لغات البرمج أســــهل
» لغة البرمجة دلفي للعرب
» كتاب في دلفي غاية في روعة ويعتب مرجع في لغة البرمجة دلفي
» منتديات قوس قزح منتدى البرمجة
» ماهي لغات البرمج أســــهل
» لغة البرمجة دلفي للعرب
» كتاب في دلفي غاية في روعة ويعتب مرجع في لغة البرمجة دلفي
» منتديات قوس قزح منتدى البرمجة
دلفي تعليم :: منتديات البرمجة :: دلفي
صفحة 1 من اصل 1
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى