هذه طريقة جديدة في "دلفي من Embarcadero"
دلفي تعليم :: منتديات البرمجة :: دلفي
صفحة 1 من اصل 1
هذه طريقة جديدة في "دلفي من Embarcadero"
هذه طريقة جديدة في "دلفي من Embarcadero"
او طريقة في التصريح ويتم بنوعين هما record و class
حسب فهمي
مثلا:
TPersonClass<RecVide: record> = class
TPersonClass<RecVide: class> = class
مثال:
----
او طريقة في التصريح ويتم بنوعين هما record و class
حسب فهمي
مثلا:
TPersonClass<RecVide: record> = class
TPersonClass<RecVide: class> = class
مثال:
----
- الكود:
type
TPersonClass<RecVide: record> = class
Vide: RecVide;
end;
TPersonRec = record
Nom,Prenom: string[20];
Adress, Liue: string[30];
eDate: TDate;
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
function PersFunc: string;
var
Person: TPersonClass<TPersonRec>;
begin
Person:= TPersonClass<TPersonRec>.create;
with Person.Vide do
begin
try
Nom := 'Ali';
Prenom := 'Ahmed';
Adress := 'Alger vile';
Liue := 'Alger vile';
eDate := 1950/01/10;
finally
Result := Format('%s %s %s %s ',[Nom, Prenom, Adress, Liue])+
FormatDateTime('yyyy-mm-dd',eDate);
Person.Free;
end;
end;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
caption := PersFunc;
end;
djelal- مبرمج مجتهد
- عدد المساهمات : 157
تاريخ التسجيل : 29/04/2015
مواضيع مماثلة
» طريقة اضافة العناصر أو المركبات الى دلفي
» كتاب في دلفي غاية في روعة ويعتب مرجع في لغة البرمجة دلفي
» صفحة رئيسية لي: embarcadero
» كيفية حذف ملف ببرنامج دلفي
» قنوات في دلفي
» كتاب في دلفي غاية في روعة ويعتب مرجع في لغة البرمجة دلفي
» صفحة رئيسية لي: embarcadero
» كيفية حذف ملف ببرنامج دلفي
» قنوات في دلفي
دلفي تعليم :: منتديات البرمجة :: دلفي
صفحة 1 من اصل 1
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى