آشنایی با تابع ، ثابت ، متغیر ، کلاس و رکورد
سلام
میخواهم کمی آموزش بزارم که تاپیک از یاد نره.
اما آموزش های اصلی و باحال بعد درس هاست.
میدونم خیلیه که آموزش نگذاشتم. باید ببخشید.
چون خیلی ها با اینها یه خورده مشکل دارن گفتم بزارم بد نیست.
اما باید زودتر از اینها میگذاشتم که دیگه متاسفانه نشد.
خوب معرفی تابع ، ثابت ، متغیر ، کلاس و رکورد
متغیر ، برای نگهداری یک نوع اطلاعات که مشخص شده.
کد:
ShowMessage(IntToStr(S));
ثابت ، نگهداری و حفظ یک نوع اطلاعات که مشخص شدنی نیست.
کد:
ShowMessage(IntToStr(S));
تابع ، انجام عملیاتی روی متغیر یا متغیر ها و در کل اطلاعاتی هست ! که در آخر نتیجه ای داره که برمیگردونه.
نتیجه یک متغیر هست که باید تعریف بشه. همیشه بعد از تابع با ":" دو نقطه شروع میشه.
کد:
function GetPostsUser(name : string) : Integer;
کد:
function TForm1.GetPostsUser(name : string) : Integer;
begin
if name = "Soldier" then
Result := 1668;
end;
کد:
ShowMessage(IntToStr(GetPostsUser(Soldier)));
بعد ها بیشتر در موردش توضیح میدم.
کلاس ، مجموعه ای از ثابت ، متغیر و تابع هاست.
کد:
Type
TUser = Class
Posts : Integer;
Name : String;
function TanksHim : String;
end;
کد:
function User.TanksHim: String;
begin
Result := "Tanks Him :D";
end;
کد:
User.Posts := 1688;
User.Name := 'Soldier';
کد:
ShowMessage(User.Name+' Have '+IntToStr(User.Posts)+' Posts, '+User.TanksHim);
رکورد ، مثل کلاس هست . مجموعه ای از ثابت و متغیر ها.
کد:
type
TUser = Record
Posts : Integer;
Name : String;
end;
کد:
User.Name := 'Soldier';
User.Posts := 1668;
کد:
ShowMessage(User.Name+' Have '+IntToStr(User.Posts)+' Posts, Tanks Him');
امیدوارم بتونم بعدها بیشتر توضیح بدم. فعلآ اینها رو داشته باشید
مثل : تعریف تابع برای رویداد ها ، تابع های مختلف ، و ساخت کمپننت
فعالیتم نهایتآ تا یک شنبه هست:13: . دیگه خوبی ، بدی دیدید حلالم کنید:) . اما بازم برمیگردم.:11:
موفق باشید.:10:
