2
Apakah ini bau kode jika suatu objek mengetahui banyak pemiliknya?
Dalam aplikasi Delphi 2007 kami, kami menggunakan banyak konstruksi berikut FdmBasic:=TdmBasicData(FindOwnerClass(AOwner,TdmBasicData)); FindOwnerClass melakukan perjalanan hierarki pemilik komponen saat ini ke atas untuk menemukan kelas tertentu (dalam contoh TdmBasicData). Objek yang dihasilkan disimpan dalam variabel Field FdmBasic. Kami menggunakan ini terutama untuk melewatkan datamodules. Contoh: Saat membuat laporan, data yang dihasilkan …