[perl-win32-gui-users] Toolbar-Question

[Carsten Zandecki <service@me...>]

Hi there,
In this code the last button is disabled :

$B =3D new Win32::GUI::Bitmap("tools.bmp");
$TB->SetBitmapSize(16, 16);
$TB->AddBitmap($B, 3);
$TB->AddButtons(
    3,
    0, 1, 4, 0, 0,
    1, 2, 4, 0, 1,
    2, 3, 0, 0, 2,
);

Is there a possibility to enable a disabled toolbar button=20
later in the event loop ?
Should be something like :
$TB->ButtonnameOrID->Enable();

Thanks for help ...
Carsten

Re: [perl-win32-gui-users] Dynamic entrys

[Aldo Calpini <dada@pe...>]

Peter Eisengrein wrote:
> for ($x=1; $x <= $mechs; ++$x) {
>     $main->MECH$x->Text("$MECH{$x}{'name'}\'s best
>     Strength setting is $MECH{$x}{'best'}.");
> }

you can access sub-windows (eg. controls) as hash keys of the main
window. change your code to:

    $main->{"MECH$x"}->Text( "blah blah blah..." );

cheers,
Aldo

__END__
$_=q,just perl,,s, , another ,,s,$, hacker,,print;