View Full Version : تعریف کلاس در دلفی و استفاده از آن
skmkh6056
جمعه 23 فروردین 1387, 11:21 صبح
با سلام
من هیچ اطلاعاتی در رابطه با تعریف و استفاده از کلاس ندارم. و چیزی هم نتونستم پیدا کنم. لطفا یه آدرسی که کامل برای یه مبتدی آموزش بده برام معرفی کنه یا اینکه یه جوری راهنماییم کنین. با تشکر و سپاس
babak_delphi
جمعه 23 فروردین 1387, 13:19 عصر
TMyClass = class
private
FMyPrivate_Var : Integer;
procedure MyPrivateProc;
protected
procedure MyProtectedProc;
public
MyPublic_Var : string;
constructor create;
procedure MyPublicProc(MyVar : integer);
end;
خوب تا اینجا یک کلاس تعریف کردید
حالا برای استفاده از اون باید اول یک متغیر از نوع اون کلاس تعریف کنید
var MyNewOBJ : TMyClass;
حالا باید اون رو create کنید
MyNewOBJ := TMyClass.Create;
برای Constractor هم یک کد می تونید بنویسید که کلاس رو Initial کنه
مثلا
constractor TMyClass.Create;
begin
FMyPrivate_Var := 10;
end;
vBulletin® v4.2.5, Copyright ©2000-1404, Jelsoft Enterprises Ltd.