Witam
Mam taki problem:
Mam na form1 komponent o nazwie aaa klasy TEdit, Na form2 tez mam komponent aaa klasy TEdit. Chce w trzecim pasie zparametryzowac ktorego aaa chce uzywac:
cos w stylu:
Procedure(forma : Tform);
begin
forma.aaa.text := 'aaaaaaaa';
end;
oczywiscie to nie dziala... jak takie cos uzyskac?
Hmm, to zależy co masz na myśli.
Możesz użyć
If (forma.FindComponent('aaaa') <> nil) and (forma.FindComponent('aaaa') is TEdit) then
TEdit(forma.FindComponent('aaaa')).Text := 'aaaaaaaaaa';
Musisz dokładnie określić co chcesz zrobić.
ALbo sobie zrób formatke bazową na której bedziesz miał tego edit'a i wtedy przekazuj tą formatkę bazową...
a nie prościej w trzecim dać
uses unit1, unit2
a później
form1.aaa.text := 'bla';
form2.aaa.text := 'ble';
???