>Is this not the proper way to add an icon to a button?
>$W->AddButton(
> -name => "SomeName",
> -left => 5,
> -top => 5,
> -text => "Print Somehing!",
> -tabstop => 1,
> -icon => "./Iconfile.ico"
>);
TRY:
# ================================
# Load Icon
$icoImage = new Win32::GUI::Icon("./images/button.ico");
# Button - SomeName
$btnSomeName = $W->AddButton(
-name => "btnSomeName",
-left => 5,
-top => 5,
-text => "Print Somehing!",
-tabstop => 1,
-icon => $icoImage,
);
if -icon => $icoImage, doesn't work try:
...
-text => "Print Somehing!",
-tabstop => 1,
);
$W->SetIcon($icoImage);
Chris
