slm arkadaşlar ben delphiye yeni başladımda bi kaç sorum olucktı cevaplarsanız sevinirim. 1-) Public ile private arasında ne fark var? 2-) Aşağıdaki koddaki public kullanımını anlatırmısınız?(property read write niçin kullanılmıştır?) 3-) Aşağıdaki procedure de var kısmında mypersonel değişkeni tanımlanmış daha sonra neden mypersonel:=tpersonel.create; kullanılmıştır? Cevaplar için şimdiden teşekkür ederim.
unit Unit2;
interface type tpersonel=class(tobject) private padi:string; psoyadi:string; Pucreti:double; public property adi:string read padi write padi; property soyadi:string read psoyadi write psoyadi; property ucreti:double read pucreti write pucreti; function maashesapla(gun:integer):double; end; implementation
procedure TForm1.Button1Click(Sender: TObject); var mypersonel:tpersonel; begin mypersonel:=tpersonel.create; mypersonel.ucreti:=15000000; showmessage(floattostr(mypersonel.maashesapla(30))); end;
Public bütün form lar yada procedure ler için geçerli olan bir veri çıktısı verir. Privete da kullanılan bir değişkenin verisi diğer donksiyonlara aktarılamaz. Diğer soruların için bütün projenin görülmesi gerekir. Kolay gelsin.
1-) private property ve method lara sadece kendi objesi ulaşabilir, public propery e size diğer objelerden ulaşmak mümkün.. Yani "ev" diye bir class olsun bunun da içinde bir private "buzdolabı" property si ve public "kapı" property si olsun. Biz bu class ın bir objesini oluştaralım adı da "bizimEv" olsun. Burada program içinde bizimEv.kapı dediğimiz zaman biz bu objeye ulaşıp değişiklik yapabiliriz, ama bizimEv.buzdolabı diyerek bu property e ulaşamayız çünkü bu propery e sadece kendi objesi ulaşabilir.
2-) Pek Delphi bilmiyorum o yüzden bende anlamadım herhalde set ve get methodları için bir yol olsa gerek.
3-) mypersonel:tpersonel bunu dediğimiz zaman mypersonel'in hangi tür olduğunu compilera bildiriyoruz ama bunun için compiler herhangi bir atama yapmıyor. Yani mypersonel adlı obje henüz oluşturulmamış durumda. mypersonel:=tpersonel.create denildiği zaman ise mypersonel bir tpersonel objesi olarak oluşturuluyor.
Ben Delphi pek bilmiyorum ama bu tür şeyler genel olduğu için herhalde doğrudur...
1-) Public ile private arasında ne fark var?
2-) Aşağıdaki koddaki public kullanımını anlatırmısınız?(property read write niçin kullanılmıştır?)
3-) Aşağıdaki procedure de var kısmında mypersonel değişkeni tanımlanmış daha sonra neden
mypersonel:=tpersonel.create; kullanılmıştır?
Cevaplar için şimdiden teşekkür ederim.
unit Unit2;
interface
type
tpersonel=class(tobject)
private
padi:string;
psoyadi:string;
Pucreti:double;
public
property adi:string read padi write padi;
property soyadi:string read psoyadi write psoyadi;
property ucreti:double read pucreti write pucreti;
function maashesapla(gun:integer):double;
end;
implementation
procedure TForm1.Button1Click(Sender: TObject);
var
mypersonel:tpersonel;
begin
mypersonel:=tpersonel.create;
mypersonel.ucreti:=15000000;
showmessage(floattostr(mypersonel.maashesapla(30)));
end;