http://www.perlmonks.org?node_id=1061767


in reply to How to use Tk::Text->SetCursor

Hmm,

nope -- perldoc Tk |grep -in position

nope -- grep SetPosition -r Tk-804.031

*brains* -- I remember its http://search.cpan.org/dist/Tk/pod/Text.pod#INDICES you want 

$text->SetCursor( "$line.$char" );
$text->SetCursor( "+ $count chars" );
$text->SetCursor( "- $count chars" );
$text->SetCursor( "+ $count lines" );
$text->SetCursor( "- $count lines" );
$text->SetCursor( "wordstart" );
$text->SetCursor( "wordend" );
$text->SetCursor( "linestart" );
$text->SetCursor( "lineend" );
$text->SetCursor( "imageName" );
$text->SetCursor( $widget );
$text->SetCursor( "tag.first" );
$text->SetCursor( "tag.last" );
$text->SetCursor( "mark" );
$text->SetCursor( "othermark" );
$text->SetCursor( "end" );
$text->SetCursor( "@30,50" ); ## pixels

[download]

Replies are listed 'Best First'.
Re^2: How to use Tk::Text->SetCursor (INDICES/INDEX)
by Yu Chen (Initiate) on Nov 08, 2013 at 20:50 UTC
    Thanks man.
    But I still cannot understand.
    For example, How to move the insert cursor to 3rd line?
[reply]

      You buy it dinner first? 

      my $line = 3;
my $char = 0;
$text->SetCursor( "$line.$char" );
$text->SetCursor( "3.0" );

      [download]
[reply]
[d/l]
        Yes, it works well. Thank you very much!
[reply]

In Section Seekers of Perl Wisdom