I am experiencing something strange in 1.02 release with textfields not
Exhibiting the WANTRETURN behavior in DialogBoxes, but the do in
Windows.
The RichEdit control WANTRETURN works with DialogBoxes as shown in the
Code below. I have to change to a Window to allow the textfield to
exhibit
The WANTRETURN behavior. The textfield code below was mostly borrowed
>From the NotePad.pl DEMO script.
# $W2 = new Win32::GUI::DialogBox ($W1,
$W2 = new Win32::GUI::Window ($W1,
-title => "Second Window",
-name => "Window2",
-menu => $M,
-left => 13,
-top => 113,
-width => 980,
-height => 570,
-style => ws_sysmenu,
);
$TF_MyText = $W2->AddTextfield(
-name => "TF_MyText",
-pos => [100,128],
-size => [300,73],
-font => $EditFont,
-multiline => 1,
-hscroll => 1,
-vscroll => 1,
-autohscroll => 1,
-autovscroll => 1,
-keepselection => 1,
-background => [196,192,153],
);
# $RE_MyText = $W2->AddRichEdit(
# -name => "RE_MyText",
# -top => 205,
# -left => 100,
# -height => 96,
# -width => 300,
# -font => $EditFont,
# -style => WS_VISIBLE | WS_VSCROLL | ES_MULTILINE |
ES_WANTRETURN,
# );
# $RE_Mytext->SetBkgndColor([196,192,153]);
Eric Hansen