Majid.Ebru
دوشنبه 29 شهریور 1389, 14:53 عصر
با سلام
خواهش مي كنم تفاوت بين Interface و Implementation رو اگه كسي مي دونه يه توضيحي بده !!
مثلاً Uint زير رو ببيند :
unit uEmployeeList;
interface
uses
SysUtils, Classes, Generics.Collections, uEmployees;
type
TEmployeeList = class(TObjectList<TEmployee>)
public
procedure GenerateSalaryList(Strings: TStrings);
end;
implementation
{
******************************** TEmployeeList *********************************
}
procedure TEmployeeList.GenerateSalaryList(Strings: TStrings);
var
AEmployee : TEmployee;
begin
Assert(Assigned(Strings),'Strings is not created');
Strings.Clear;
for AEmployee in Self do
Strings.Add(AEmployee.Name + '=' + CurrToStr(AEmployee.Salary));
end;
end.
چرا Uses رو توي قسمت Interface تعريف شده ؟ چرا توي قسمت Implementation تعريف نشده است ؟ اصلاً چه تفاوتي داره ؟
چرا كلاس رو توي قسمت Interface تعريف شده ؟ چرا توي قسمت Implementation تعريف نشده است ؟ اصلاً چه تفاوتي داره ؟
با تشكر فراوان
خواهش مي كنم تفاوت بين Interface و Implementation رو اگه كسي مي دونه يه توضيحي بده !!
مثلاً Uint زير رو ببيند :
unit uEmployeeList;
interface
uses
SysUtils, Classes, Generics.Collections, uEmployees;
type
TEmployeeList = class(TObjectList<TEmployee>)
public
procedure GenerateSalaryList(Strings: TStrings);
end;
implementation
{
******************************** TEmployeeList *********************************
}
procedure TEmployeeList.GenerateSalaryList(Strings: TStrings);
var
AEmployee : TEmployee;
begin
Assert(Assigned(Strings),'Strings is not created');
Strings.Clear;
for AEmployee in Self do
Strings.Add(AEmployee.Name + '=' + CurrToStr(AEmployee.Salary));
end;
end.
چرا Uses رو توي قسمت Interface تعريف شده ؟ چرا توي قسمت Implementation تعريف نشده است ؟ اصلاً چه تفاوتي داره ؟
چرا كلاس رو توي قسمت Interface تعريف شده ؟ چرا توي قسمت Implementation تعريف نشده است ؟ اصلاً چه تفاوتي داره ؟
با تشكر فراوان