+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : قسم التعريف بمكونات وادوات دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=33)
+--- الموضوع : TMS Aurelius (/showthread.php?tid=9526)
TMS Aurelius - Delphi4Us - 13-06-2018
هذا الذي لن استطيع ان اذكر كل خصائصه او مهامه وانما ما فهمته او بعض مما فهمته فقط
ويبدو يستحق النشر والتعريف به
PHP كود :
https://www.tmssoftware.com/site/aureliusblog.asp
يمكنك من استخدام ثقنية Linq او شئ شبيه بها في عملية البحث بالبيانات
PHP كود :
Manager.Find<TOrder>
.CreateAlias('OrderDetails', 'd')
.Select(TProjections.ProjectionList
.Add(Linq['OrderDate'].Year.Group.As_('Group'))
.Add((Linq['d.UnitPrice'] * Linq['d.Quantity']).Sum.As_('Value'))
)
.Where(Linq['OrderDate'].Year._In([1997, 1998]))
.OrderBy('Value')
وايضا انشاء الكلاسس والبحث فيها
PHP كود :
type
TContact = class
private
FId: integer;
FName: string;
FCountry: TCountry;
public
property Id: integer read FId write FId;
property Name: string read FName write FName;
property Country: TCountry read FCountry write FCountry;
end;
PHP كود :
// Get all contacts
MyContacts := Manager.Find<TContact>.List;
// Get name of country of first contact:
FirstContactCountryName := MyContacts[0].Country.Name;
اي انك لم تعد في حاجة الى استخدام جمل الاستعلام التقليدية مثل
PHP كود :
SELECT A.ID AS A_ID, A.NAME AS A_NAME, A.COUNTRY_ID AS A_COUNTRY_ID, B.ID AS B_ID, B.NAME AS B_NAME
FROM CONTACT A LEFT JOIN COUNTRY B ON (B.ID = A.COUNTRY_ID)
مع امور اخرى كثيرة يمكن مراجعتها بالرابط فوق