Maybe the subject is a litlle ambigous but...
Well, in this case I'm an trying to create and use a set of Windows with =
the same behaviour, that's to say:=20
$w_analisi{$est_alu->{Nom}} =3D Win32::GUI::Window->new (
-top =3D> 0,
-left =3D> 0,
-width =3D> 600,=20
-height =3D> 400,
-minsize =3D> [600,400],
-text =3D> "Comentaris respecte $est_alu->{Nom}",=20
-name =3D> "Mailtool::tutor::e_w_analisi",);
$comentaris{$est_alu->{Nom}} =
=3D$w_analisi{$est_alu->{Nom}}->AddTextfield(
-foreground =3D> [0, 0, 0], # Color del text: negre
-text
-font =3D> $Mailtool::mevesfonts::fo_normal,
-left =3D> 10,
-top =3D> 10,
-height =3D> 350,
-width =3D> 480,
-name =3D> "Mailtool::tutor::t_comentari",
-addstyle =3D> WS_CHILD | WS_VISIBLE | WS_VSCROLL=20
| ES_LEFT | ES_MULTILINE | ES_AUTOVSCROLL,
);
$comentaris{$est_alu->{Nom}}->Text("${toteltex}");
$b_guardar{$est_alu->{Nom}} =3D $w_analisi{$est_alu->{Nom}}->AddButton(
-text =3D> "GUARDAR", # Text al bot=F3
-font =3D> $Mailtool::mevesfonts::fo_normal,
-left =3D> 520,
-top =3D> 85,
-height =3D> 25,
-name =3D> "Mailtool::tutor::b_${est_alu->{Nom}}", # =
????????????????????
);
$w_analisi{$est_alu->{Nom}}->Show();
How I can receive the event for every instance of button ?? Every window =
have its own button.
I guess you understand what I'm trying to do...you know.....Monday =
morming...
Regards from Catalonia,
Guillem Cunillera i Wefers
|
