طريقتان مغنيتان عن إضافة مكوّنات جديدة
#3
كود :
بالتوفيق ومن كان عنده إضافة علم فلا يحرمنا منها .
السلام عليكم Big Grin
كود :
ولعل الطريقة هذه فقط في delphi2010
بل دلفي 2007 Wink

class helper : لقد حل العديد من مشاكل ال OOP , لدي مثال في ال VCL Style Extractor
ألق نظرة على الوحدة SMPStyle
كود :
http://www.delphi4arab.net/forum/showthread.php?tid=7969

كما هناك ال Record Helper Big Grin
PHP كود :
type intHelper =record helper for integer
public
Function 
ToString():String;
end;

function 
intHelper.ToStringString;
begin
result
:=IntToStr(Self);

end

الآن يمكننا الكتابة بالشكل التالي :
PHP كود :
var MyInt:integer ;
begin
MyInt
:=2013;
Caption:=MyInt.ToString ;
end

و السلام عليكم Big Grin
[-] كل من 1 user says قال شكرا ل SMP3 على المشاركة المفيدة
  • invocker
الرد


الردود في هذا الموضوع
طريقتان مغنيتان عن إضافة مكوّنات جديدة - بواسطة SMP3 - 02-12-2012, 02:50 PM

التنقل السريع :


مستخدمين يتصفحوا هذا الموضوع: 1 ضيف