protected hakkında

[egedenizi]

merhabalar

vcl'de protected olarak hazirlanmis procedure ve fonksiyonları çağırabilir miyiz?Teşekkür ederim....

[sabanakman]

protected daha çok özellik tanımlama bölümüdür. Fonksiyon ve prosedürlerin yazımı burada olmaz. (virtual ve dynamic olanlar hariç). protected bölümde yazılan özellik, fonksiyon ve prosedürler çocuk sınıflarda açığa çıkartılabilir. Mesela TEdit nesnesinin kodlarına bakarsanız, TCustomEdit'ten türemiştir ve sadece TCustomEdit'te tanımlanmış protected özelliklerin published içinde tanımlanarak açığa çıkarılmış hali olduğunu göreceksiniz. virtual veya dynamic prosedür, fonksiyonlar da override ile yeniden yazılabilir durumdadırlar.

[fatihtolgaata]

Çağırabilirsiniz. Bu aslında hileli bir teknik ama işe yarar. Mesela:

Kod: Tümünü seç

TSomeClass = class
protected
  procedure BirMetod; virtual;
end;

gibi bir fonksiyondaki protected metoda erişmek için ya bu fonksiyondan türeyen bir bileşen yapacaksınız ya da kodlarınız bu sınıfın uniti ile aynı olacak. Ya da aşağıdaki tekniği kullanacaksınız:

Kod: Tümünü seç

TGosterenClass = class(TSomeClass)
public
  procedure BirMetod; override;
end;

Daha sonra kodlar içinde TSomeClass.BirMetod'a ulaşmak için:

var
  SomeClass: TSomeClass;
begin
  ....
  TGosterenClass(SomeClass).BirMethod;

Bileşen türetmeye benzese de yeni bir bileşen kaydettirmiyorsunuz. Böylece belkide bir çok bileşeni yeniden türetmekten kurtulmuş oluyorsunuz. Burada eğer prosedür sanal ya da dinamik ise override etmeyi unutmuyorsunuz, eğer değilse override kelimesini kaldırmalısınız.

vesselam