MdiChild a müdahale

[serbek_tr]

Hayırlı çalışmalar;

Arakadaşlar Kısa bir örmnke vereyim

Kod: Tümünü seç

Procedure TForm1.MdiChilAc(Sender:Tobject);
Begin
  Application.CreateForm(TForm_Editor,Form_Editor);
  Form_Editor.Show;
End;

Böylece MdiChild Formumu create ettim ve bu formda birtane richedit nesnesi var

Kod: Tümünü seç

Procedure Tform1.MdiChilEditorSize(Sender:Tobject);
Begin
  Form_Editor.Richedit1.Paragraph.Alignment:=TaCenter;
End;

Dedik buraya kadar herşey hoş şimdi mdi formada aç düğmesine basıp bir child form daha açarsam bu size düğmesi hangi editorü kontrol eder ben aktif olanı etmesini istiyorum mesela ama sadece birine müdahale ediyor tabi bu size komutunu ana formdan verdiğim için child ların kendi üzerinden verirsem bir sorun yok ama önemli olan kontrolü ana formdan yapamak ve aktif pencere hangisi ise on ayapmak arkadaşlar teşekkür ederim

[Abrak]

TForm_Editor(findcomponent(form1.ActiveMDIChild.Name)).RichEdit1.Paragraph.Alignment:=TaCenter;

Kolay Gelsin;

[serbek_tr]

Arakdaşım ilgine teşekkür ederim;
Access Violation at address ile başlayan bir hata veriyor

[Abrak]

Kod: Tümünü seç

TForm_Editor.Create(self);

Şeklinde create edersen sorun kalkacaktır sanırım

[serbek_tr]

Arkadaşım bu vermiş olduğun kod parçasının

create(self) olayına göre değilde acaba Apllication(Tform,form) olayına göre olanı mümkünmüdür çünkü başkaca kontrolerim var onlar hata verecek bu defa

[serbek_tr]

Abrak yinede bu söylediğime uygun bir çözüm bulursan çok sevinirim yardımın için Allah Razı olsun Arkadaşım çok işimi gördü artık diğer problemleri ben halledeceğim çok sağol

[Abrak]

create değiştirmen kontrollerini etkilemez sadece 2 satır düzelteceksin belki çözümü vardır ama benim bilgi daracımda öyle bir bilgi yok

[Abrak]

Beyin jimnastiğinin sonu yoktur

Kod: Tümünü seç

TForm_Editor(Application.FindComponent(form1.ActiveMDIChild.Name)).RichEdit1.Paragraph.Alignment:=TaCenter;

Düşünürken acabamı dedim ve oldu
Kolay gelsin

[serbek_tr]

kardeş çok haklısın valla bizmi iflas ettik yoksa artık kapasite meselesimi ona bilir kişiler karar versin, ne deseniz kabul valla artık
bu arada birşey daha sormak isterim verdiğin kod içerisinde
ActiveMDIChild.Name geçiyor ya mesela bu child ler açık iken özelliği fsstayontop olan bir form açıyorum ve bu formdan verdiğin koda göre activ olan childe kontrol gönderebiliyorum ama mesela bu fsstayontop bir arama formu ve burdaki değer child lar arasında önde bulunan yani diğer form açıldığı için aktif olma özelliği kalmayan ama en son aktif olan forma müdahale edemiyorum çünkü active child yok bu nasıl çözülür bir yardımın olursa sevinirim lütfen tembellik olarak değerlendirme bu sorunu çözmek için 3 günümü harcadım boşu boşuna ve bugün son günüm yani biten bir proje idi ama sadece ekranda bulunan bir rihedit idi bunu childlerle yapmaya karar verince olay bu duruma geldi hoş gör teşekkür ederim

[Abrak]

Kod: Tümünü seç

MDIChildren[0].Name

MDIChildren formların en üsttekini verir aşağıya doğru 1,2,.. diye gider

[serbek_tr]

Abrak Harbiden sen fazla jimnastik yapmışsın Allah Güç Kuvvet Vermeye devam etsin inşallah Sen Bugün beni çok sevindirdin Yaradan seni mutlu etsin.
Arkadaşım beni sevindirmen karşılığında sana verebildiğim tekşey(Karşılık beklediğini düşündüğümden değil sadece gerçekten sevincimi ifadde etmek için söylüyorum) Dua Allah Razı olsun kardeş.

umarım birgün benim de sana küçükte olsa bir bilgi yardımım olur.

[Abrak]

cümlemizden razı olsun;
Yardımım dokunduysa ne mutlu bana

Kolay Gelsin;

[sychorax]

Örneğin formun adı frmeditor ise.
Formu Oluşturmak için

Kod: Tümünü seç

application.crateform(Tfrmeditor,frmeditor);

Formdaki bir bileşene ulaşmak için

Kod: Tümünü seç

Tfrmeditor(ActiveMdiChild).richedit1.lines.add('yazı');

Ben bunları kullanıyorum.

[serbek_tr]

Teşekkür ederim sayenizde kaybettiğim 3 günü kazanmış oldum zamandan daha önemli ne varki