Dear Sir,
I have put the some string in textfield box, but not show text in print format...
Please help me sir.
Show put string in print statement for button3_Click.
my $textfield = $mainform->AddTextfield(
-name => "Output",
-notify => 1,
-pos => [319,245],
-size => [216,25],
-multiline => 0,
-autohscroll => 0,
-vscroll => 1,
-autovscroll => 0,
-visible => 1,
);
my $button3 = $mainform->AddButton(-name=>'button3', -top=>350, -left=>280, -size=> [100,40], -font => $font1, -text=>"Test");
Regards,
Kathirvel.P
sub button3_Click
{
$text = Win32::GUI::Textfield($textfield);
print "$text\n";
}