RE: [perl-win32-gui] sample code

[Eric Hansen]

$Window->textfield->SetFocus();
$Window->textfield->Select(0,length($Window->textfield->Text()));

Doing a Select is also handy if you want the text in the field to
be selected (such as on return from a validation routine that
found an error with the text in the textfield) so that the user can
replace the bad text when they begin typing.

Regards
Eric Hansen

-----Original Message-----
From:   Aldo Calpini [SMTP:[EMAIL PROTECTED]]
Sent:   Thursday, July 01, 1999 6:43 AM
To:     [EMAIL PROTECTED]
Subject:        Re: [perl-win32-gui] sample code

Khoa Doan wrote:
>Does anyone know how to place a cursor in a text field or in a text box ?

$Window->textfield->SetFocus();

__END__
# Aldo Calpini
print sort {$_{$a} cmp $_{$b}} values %{{split undef, 
"xritajbugne fahokem csuctawer jhdtlrnpqloevkshpr"}};