fsMDIForm, fsMDIChild nesnelerin kullanımı

[Abrak]

fsMDIForm içinde program çalışırken durama göre 1..50 arası fsMDIChild formu oluşturuyorum fsMDIChild içinde Richedit nesnesi var

Programda çalışmaya devam ederken fsMDIChild içindeki richeditlere ulaşılması gerekiyor ana formdan yazılan yazıyı ilgili fsMDIChild deki richedite atacak tabi bunuda yapıyoruz fakat;

Benim öğrenmek istediğim bu fsMDIChild'in içindeki richeditlere fsMDIChild.name olarak değil de direk captionlarından ulaşmak mümkünmü

[Misafir]

richeditlere fsMDIChild.name olarak değil de direk captionlarından ulaşmak mümkünmü

nasıl yani?caption'dan kasıt nedir?

[gkimirti]

Kod: Tümünü seç

for i:=0 to MdiChildCount-1 do
  if  MdiChildren[i].Caption='aranan caption' then
     Bu Bizim Formumuz...

[Abrak]

Kod: Tümünü seç

for i:=0 to MdiChildCount-1 do
  if  MdiChildren[i].Caption='aranan caption' then
     Bu Bizim Formumuz...

qkimirti bu şekilde kullanamıyorum sebebi ise; bilgi alışverişi yoğun olacağından programı çok yavaşlatacak olması;

Aslında benim arayışımın sebebi form oluştururken form.name ye normal string verdiğinde sorun olmayacaktır ama kullanıcı - / # gibi işaretlerde koymak istediğinde name bölümünde hata meydana gelecektir ve kullanıcıyı kısıtlama şansım yok o yüzden captiondan ulaşabilmek aklıma geldi

[mrmarman]

Merhaba...

- Bu taktirde global bir listede (StringList, ListBox vb.) index tutacaksınız.

- Her create edilen pencerenin bahsettiğiniz caption ve dilediğiniz bağlantı yolunu (Handle, Form adı vb.) not edecek, erişim istediğinizde bu listeden adresinizi bulacak ve çağıracak veya free edeceksiniz.

[Abrak]

mrmcop Teşekkür ederim yöntem için;

Birde ben şu şekilde yazdım ama tereddütüm var programda yavaşlamaya yol açarmı açmazmı diye daha tecrübem olmadığı için;

Kod: Tümünü seç

function yaz(bul:string) :string;
var
i:integer;
begin
for i:=0 to form1.MDIChildCount-1 do
begin
if form1.MDIChildren[i].Caption = bul then result := form1.MDIChildren[i].Name;
application.ProcessMessages; //veri yığılmasında bekleme yapmaması için kullandım aynı anda işlem yapabilmesi için
end;
end;