Kontrolleri Tool Palatteden almayıp, kodla oluşturma.

[neu84]

arkadaşlar hani biz tool pallateten kontrol ekliyoruz ya forma, diyelim ki shape ekliycez. ama program çalışırken 1 den fazla shape oluşturmam gerekebilir. bu yüzden tooldan degilde kendi elimde yaratayım istiyorum shape i, ancak aşagıdaki gibi oluşturdugumda programı execute edince access violation hatası veriyor. Bu tür şeyleri elimle oluşturmak istedigimde sürekli böyle sorunlarla karşılaşıyorum ve hep vazgeçiyorum. Kontrollerim hep sabit oluyo, ben program akışına göre kontrol oluşturabilmek istiyorum.. Nasıl bi yol izlemeliyim?

var
myshape:TShape;
begin
myshape.Enabled:=True;
myshape.Brush.Color:=clRed;
myshape.Shape:=stRectangle;
myshape.Pen.Color:= clBlue;
myshape.Left:=50;
myshape.Top:=100;
myshape.Width:=150;
end;

[unicorn64]

nesneleri kullanmadan önce create etmeniz gerekir...

Kod: Tümünü seç

var
myshape:TShape;
begin
myshape:=TShape.Create(nil);  //shape nesnesini oluştur
myshape.parent:=panel1; // shape nesnesini hangi nesnenin üzerine koyacağını belirle
myshape.Enabled:=True;
myshape.Brush.Color:=clRed;
.......

[neu84]

nesneleri kullanmadan önce create etmeniz gerekir...

Kod: Tümünü seç

var
myshape:TShape;
begin
myshape:=TShape.Create(nil);  //shape nesnesini oluştur
myshape.parent:=panel1; // shape nesnesini hangi nesnenin üzerine koyacağını belirle
myshape.Enabled:=True;
myshape.Brush.Color:=clRed;
.......

Çok teşekkür ederim kardeş. create içine yazdıgın nil tam olarak oluyo? Çok rastlıyorum ama ne oldugunu bilmiyorum. self ile nil in arasında ne gibi bi fark vardır?