private void SelectCurrentWord()
{
Row xtr = Caret.CurrentRow;
if (xtr.Text == "")
return;
if (Caret.Position.X >= xtr.Text.Length)
return;
string Char = xtr.Text.Substring(Caret.Position.X, 1);
int Type = CharType(Char);
int left = Caret.Position.X;
int right = Caret.Position.X;
while (left >= 0 && CharType(xtr.Text.Substring(left, 1)) == Type)
left--;
while (right <= xtr.Text.Length - 1 && CharType(xtr.Text.Substring(right,
1)) == Type)
right++;
Selection.Bounds.FirstRow = Selection.Bounds.LastRow = xtr.Index;
Selection.Bounds.FirstColumn = left + 1;
Selection.Bounds.LastColumn = right;
Caret.Position.X = right;
Caret.SetPos(Caret.Position);
Redraw();
}