Runtime da olusan panele TabOrder Verme

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
otherside
Üye
Mesajlar: 65
Kayıt: 11 Mar 2005 02:48
Konum: istanbul

Runtime da olusan panele TabOrder Verme

Mesaj gönderen otherside »

Merhaba Arkadaşlar benim sorunum ben bi matrıs tablo olusturuyorum runtime da

1 2 3 4 5 6 7 8 ..............................31
a
b
c
d
e
f
sayıların altında edit var
sıkıntım satır satır yaptıgım için hepsini bir panele oturtum ben tab la ilerlemek istedigimde F in en sonundan baslamakta ve basa dogru gitmekte .. olustururken bileşenlerin tam tersi bir dongu yaparak

Kod: Tümünü seç

quOrder.Open;
quOrder.First;
orderNo:=1000;
 //OrderPnl:=0   ;
sa:= DaysInAMonth(StrToInt(Pyil),StrToInt(Pay));
 For j:=0  TO quOrder.RecordCount-1   do Begin
        OrderPnl:=OrderPnl+1;


 for i:=1  TO sa do Begin
  orderNo:=orderNo+1;
   TEdit(frmnewistisna.findcomponent(quOrderistisnaKod.Text+'edit'+inttostr(i))).TabOrder:=orderNo;


 end;
bu sekilde a nın basından baslaması gerekırken f in basından baslayıp e.d.c die gitmekte burda sıkıntı olarak gordugum panellere oturtugum için ondan mı kaynaklanıyo ve panelin taborder inı duzenlemek istedigimde bana hep -1 gelıyo benım atadıgım deger geçerli olmuyo beni bilgilendirirseniz sevinirim panel in taborderini da sole ayarlamaya çalısıyorum

Kod: Tümünü seç

for i:=1  To Sayi Do Begin
Pnl:=TbsSkinPanel.Create(Self);
Pnl.Name:=quPuantajTabloistisnaKod.Text;
pnl.TabStop:=True;
   
 pnl.TabOrder:=sayi-i;
ShowMessage(Pnl.Name +' '+IntToStr(pnl.TabOrder));
Kullanıcı avatarı
otherside
Üye
Mesajlar: 65
Kayıt: 11 Mar 2005 02:48
Konum: istanbul

Mesaj gönderen otherside »

arkadaşlar sorunu çözdüm sorunu mu panel degilde groupbox yaparak taborder inida olusturma anında degil olustuktan sonra show olurken duzenledim ve suanda duzgun bi şekilde çalısıyo.
Cevapla