JvTabBar

[abdulkadir]

s.a
advMditabbar kullanıyordum ama lisans almak gerekiyordu vazgectim bunun yerine
ücretsiz tavsiye edebileceginiz tabbar componenti varmı?

JvTabBar ı denedim ama mdi kontrolu yok
MDIChild formlarda kullanırken eksik kalıyor gibi

iyi calısmalar.

[Battosai]

Artık eksik kalan yerleri siz yapacaksınız....ücretsiz olmasının azda olsa külfeti olsun artık

[abdulkadir]

Artık eksik kalan yerleri siz yapacaksınız....ücretsiz olmasının azda olsa külfeti olsun artık

haklısın ne diyelim
ticari bir cıkar olmayacagı için satın almıyorum aksi takdirde alırdım tabiki

cok ise yarayan bir cok ücretsiz component var belki istedigimde vardır ama bilemiyorum arıyorum sadece.

bahsettigim sorunu anlatayım

jvtabbar ontabclosed işlemine asagıdaki kodu yazarak tabın close butonu ile child formu kapatıyorum

Kod: Tümünü seç

procedure TMainForm.JvTabBar1TabClosed(Sender: TObject; Item: TJvTabBarItem);
begin
    item.Data.Free;
end;

sorun ise
child formun close butonuna bastıgımda bu form icin olusturdugum tab silinmiyor
Silmek için
söyle procedure denedim

Kod: Tümünü seç

procedure TMainForm.Lib_Close_Tab(XForm:String);
var
i:integer;
  begin
    try
   for i := 0 to JvTabBar1.Tabs.Count -1 do  begin
     if JvTabBar1.Tabs[i].Caption = XForm then begin
         JvTabBar1.Tabs.Delete(i);
       end;
    end;
  except abort;
 end;
end;

ve child formun onclose işlemine

Kod: Tümünü seç

procedure TChildForm1.FormClose(Sender: TObject;
  var Action: TCloseAction);
begin
   MainForm.Lib_Close_Tab(Caption);
   Action := cafree;
   ChildForm1 :=  Nil;
end;

bu kodlama ile childe ait tabıda kapatıyorum
Asıl Sorun child formlar birden fazla acıldıgında kapanısta hata veriyor
bir Formun Gerektiginde 1 den fazla acılmak sorunda

cözüm bulunur ama ugasmak lazım
ben ugrasmamak için varsa bu iş için yazılmıs ve ucretsiz bir component neden kullanmayayım.

sevgiler..

[sadettinpolat]

olusturdugun mdi formunun onclose olayinda tabbari da yok etmen lazim.
aslinda en temizi tms nin kodlarina bakip advmditabbarin kodlarindan esinlenmek lazim

[abdulkadir]

olusturdugun mdi formunun onclose olayinda tabbari da yok etmen lazim.
aslinda en temizi tms nin kodlarina bakip advmditabbarin kodlarindan esinlenmek lazim

Kod: Tümünü seç

Lib_Close_Tab(XForm:String);

zaten oyle yapıyorum ama jv nin tabbarı bu iş için uygun degil.
adv kullandıysanız farkı görmüssünüzdür extra hicbirsey yapmanıza gerek yok
addform(childform); diyorum gerisini o hallediyor.