Kako mogu da prenesem tekst iz Editbox komponente koja se nalazi na MDI Child formi1 u Labelu koja se nalazi na MDI Child formu2???
MDI Child form :((((
Zaključano
Zakačeno
> Kako mogu da prenesem tekst iz Editbox komponente koja se nalazi na MDI Child formi1 u Labelu koja se nalazi na MDI Child formu2???
Ako su to različite klase (npr, TMDIForm2, i TMDIForm1) i postoji po samo jedan primerak onda možeš direktnom dodelom preko form promenljive, MDIForm1.Label1.Caption := 'Test'; U suprotnom možeš proći kroz listu svih postojećih formi (preko Screen.Forms ili MainForm.MDIChildren) dok ne nađeš željenu, typecastovati i dodeliti vrednosti.
Ako su to različite klase (npr, TMDIForm2, i TMDIForm1) i postoji po samo jedan primerak onda možeš direktnom dodelom preko form promenljive, MDIForm1.Label1.Caption := 'Test'; U suprotnom možeš proći kroz listu svih postojećih formi (preko Screen.Forms ili MainForm.MDIChildren) dok ne nađeš željenu, typecastovati i dodeliti vrednosti.
Code:
for i := 0 to MainForm.MDIChildCount - 1 do
if MainForm.MDIChildren[i].Name = 'MDIForma2' then
TMDIForm2(MainForm.MDIChildren[i]).Label1.Caption := 'Test';
for i := 0 to MainForm.MDIChildCount - 1 do
if MainForm.MDIChildren[i].Name = 'MDIForma2' then
TMDIForm2(MainForm.MDIChildren[i]).Label1.Caption := 'Test';
Potpis
Do not be a help vampire (http://slash7.com/pages/vampires), use the google.
How to ask questions the smart way:
http://www.catb.org/~esr/faqs/smart-questions.html
http://solair.eunet.rs/~fangor...stions/smart-questions.sr.html
How to ask questions the smart way:
http://www.catb.org/~esr/faqs/smart-questions.html
http://solair.eunet.rs/~fangor...stions/smart-questions.sr.html
1Sviđa mi se :thumbsup: 1