Arama butonu
Bu konudaki kullanıcılar: 1 misafir
2
Cevap
253
Tıklama
0
Öne Çıkarma
acemi delphiciye yardım(acill)
N
20 yıl
Teğmen
Konu Sahibi

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;

DH forumlarında vakit geçirmekten keyif alıyor gibisin ancak giriş yapmadığını görüyoruz.

Üye olduğunda özel mesaj gönderebilir, beğendiğin konuları favorilerine ekleyip takibe alabilir ve daha önce gezdiğin konulara hızlıca erişebilirsin.

Üye Ol Şimdi Değil