Александр Климов - Программирование КПК и смартфонов на .NET Compact Framework Страница 12

private void textBox1_KeyUp(object sender, KeyEventArgs e) {

 if (e.KeyCode == Keys.Enter) textBox2.Focus();

}

private void textBox2_KeyUp(object sender, KeyEventArgs e) {

 if (e.KeyCode = Keys.Enter) textBox3.Focus();

}

private void textBox3_KeyUp(object sender, KeyEventArgs e) {

 if (e.KeyCode == Keys.Enter) textBox1.Focus();

}

Управление полосой прокрутки

При отображении большого текста пользователь может применять полосу прокрутки для перемещения по тексту. Разработчик может использовать сообщение WM_VScroll для программного управления полосой прокрутки. Например, можно использовать этот механизм для создания эффекта автоматической прокрутки текста.

Для иллюстрации примера нужно расположить на форме текстовое поле и отобразить в нем какой-нибудь длинный текст. В примере используется отрывок из произведения А. Пушкина «Дубровский». Также на форме надо расположить четыре кнопки, при помощи которых пользователь сможет управлять отображением текста, прокручивая его на одну строчку или страницу вниз и вверх. В листинге 4.2 приведен код, который реализует описанный способ отображения текста.

[DllImport("coredll.dll")]

extern static int SendMessage(IntPtr hWnd, uint Msg, int wParam, int lParam);

/// <summary>

/// Сообщение Windows для работы с полосой прокрутки

/// </summary>

const int WM_VSCROLL = 0x115;

// константы для сообщения WM_VSCROLL

const int SB_LINEUP = 0:

const int SB_LINEDOWN = 1;

const int SB_PAGEUP = 2;

const int SB_PAGEDOWN = 3;

private void Form1_Load(object sender, EventArgs e) {

 // Отрывок из повести А.С.Пушкина "Дубровский"

 txtBook.Text = @"Несколько лет тому назад в одном из своих

 поместий жил старинный русский барин, Кирила Петрович Троекуров.

 Его богатство, знатный род и связи давали ему большой вес в губерниях,

 где находилось его имение. Соседи рады были угождать малейшим его

 прихотям; губернские чиновники трепетали при его имени; Кирила

 Петрович принимал знаки подобострастия как надлежащую дань; дом его

 всегда был полон гостями, готовыми тешить его барскую праздность,

 разделяя шумные, а иногда и буйные его увеселения.";

}

private void butUp_Click(object sender, EventArgs e) {

 // на одну строчку вверх

 SendMessage(txtBook.Handle, WM_VSCROLL, SB_LINEUP, 0);

}

private void butDown_Click(object sender, EventArgs e) {

 // на одну строчку вниз

 SendMessage(txtBook.Handle, WM_VSCROLL, SB_LINEDOWN, 0);

}

private void butPageUp_Click(object sender, EventArgs e) {

 // на одну страницу вверх

 SendMessage(txtBook.Handle, WM_VSCROLL, SB_PAGEUP, 0);

}

private void butPageDown_Click(object sender, EventArgs e) {

 // на одну страницу вниз

 SendMessageCtxtBook.Handle, WM_VSCROLL, SB_PAGEDOWN, 0);

}

Внешний вид приложения показан на рис. 4.1.

Рис. 4.1. Программная прокрутка текста

Многострочный текст в кнопке

По умолчанию текст для кнопок может содержать только одну строку. Но при желании можно изменить этот стиль с помощью функций GetWindowLong и SetWindowLong, как показано в листинге 4.3.

[DllImport("coredll.dll")]

private static extern IntPtr GetCapture();

[DllImport("coredll.dll")]

private static extern int GetWindowLong(IntPtr hWnd, int nIndex);

[DllImport("coredll.dll")]

private static extern int SetWindowLong(IntPtr hWnd, int nIndex,

 int dwNewLong);

public const int GWLSTYLE = -16;

// стиль многострочного текста

public const int BS_MULTILINE = 0x2000;

private void Form1_Load(object sender, EventArgs e) {

 IntPtr hWnd;

 int style;

 this.butMultiline.Capture = true;

 hWnd = GetCapture();

 this.butMultiline.Capture = false;

 style = GetWindowLong(hWnd, GWL_STYLE);

 SetWindowLong(hWnd, GWL_STYLE, style | BS_MULTILINE);

}

В этом примере для сравнения использовались две кнопки. На каждой из них размещен достаточно длинный текст (рис. 4.2).

Рис. 4.2. Вид кнопок в процессе программирования

При загрузке формы выполняется изменение стиля для первой кнопки butMultiline, а вторая кнопка остается без изменений. После запуска приложения можно заметить, что длинный текст в первой кнопке разбивается на две строки и полностью умещается в границах кнопки. Во второй кнопке слова обрезаются, и текст просто нельзя прочитать (рис. 4.3).

Рис. 4.3. Создание многострочного текста на кнопке

Данный пример был написан еще для .NET Compact Framework 1.0. В .NET Compact Framework 2.0 нет надобности вызывать функцию GetCapture() для получения дескриптора hWnd, так как теперь поддерживается свойство Control.Handle.

Увеличение ширины выпадающего списка ComboBox

Выпадающий список у комбинированного окна равен ширине самого комбинированного окна ComboBox. Но можно обойти это ограничение с помощью неуправляемого кода, как показано в листинге 4.4.

/// <summary>

/// Сообщение, получающее размеры выпадающего списка

/// комбинированного окна

/// </summary>

const int CB_GETDROPPEDWIDTH = 0x015f;

/// <summary>

/// Сообщение, устанавливающее размеры выпадающего списка

/// комбинированного окна

/// </summary>

const int CB_SETDROPPEDWIDTH = 0x0160;

[DllImport("coredll.dll")]

static extern int SendMessage(IntPtr hwnd, int msg, int wParam, int lParam);

private void Form1_Load(object sender, EventArgs e) {

 comboBox1.Items.Add("Раз");

 comboBox1.Items.Add("Два");

 comboBox1.Items.Add("Три");

 comboBox2.Items.Add("Длинный текст");

 comboBox2.Items.Add("Очень длинный текст");

 comboBox2.Items.Add("Hy очень длинный текст");

 // Устанавливаем желаемую ширину

 SendMessage(comboBox2.Handle, CB_SETDROPPEDWIDTH, 200, 0);

 // Получим ширину выпадающего окна

 int retval = SendMessage(comboBox2.Handle, CB_GETDROPPEDWIDTH, 0, 0);

 this.Text = retval.ToString();

}

На форме надо разместить два элемента ComboBox. Один из них будет стандартным. А второй элемент обработает сообщение CB_SETDROPPEDWIDTH со значением второго параметра 200. В результате выпадающий список будет в ширину занимать 200 пикселов.

После запуска программы сначала надо обратить внимание на работу первого комбинированного окна (рис. 4.4). Оно ведет себя стандартным образом.

Рис. 4.4. Стандартный размер выпадающего списка

Теперь нужно перейти ко второму комбинированному окну. У него размер выпадающего списка увеличился, что позволяет увидеть весь текст (рис. 4.5).

Рис. 4.5. Увеличенный размер выпадающего списка у ComboBox

ListBox

Элемент ListBox имеет множество возможностей, которые пока не реализованы в рамках платформы .NET Compact Framework. В частности, данный элемент не позволяет осуществлять поиск элементов по первым символам. Но для решения этой задачи можно использовать сообщение LB_FINDSTRING.

Чтобы создать тестовое приложение, нужно добавить на форму список ListBox и текстовое поле TextBox. Также потребуется ввести код, приведенный в листинге 4.5.

const int LB_FINDSTRING = 0x018F;

const int LB_FINDSTRINGEXACT = 0x01A2;

[DllImport("coredll.dll")]

static extern int SendMessage(IntPtr hwnd, int msg,

 int wParam, string lParam);

private void textBox1_TextChanged(object sender, EventArgs e) {

 //поиск строки по вводимым символам

 listBox1.SelectedIndex =

  SendMessage(listBox1.Handle, LB_FINDSTRING, -1, textBox1.Text);

}

private void Form1_Load(object sender. EventArgs e) {

 listBox1.Items.Add("bank");

 listBox1.Items.Add("banana");

 listBox1.Items.Add("ball");

 listBox1.Items.Add("bounty");

 listBox1.Items.Add("bar");

}

После запуска проекта можно попробовать ввести в текстовом поле любое слово. Если в списке есть слова, начинающиеся с введенных символов, то они начнут выделяться в списке. Например, можно сначала ввести символ b, затем a и, наконец, l. Сначала будет выделено слово bank, а после третьего введенного символа выделение перейдет на слово ball.

Существует также сообщение LB_FINDSTRINGEXACT, которое осуществляет поиск по целому слову без учета регистра. Имеет смысл применять его, когда список содержит сотни записей и отыскивание нужного слова становится утомительным занятием. Чтобы показать применение этого сообщения, нужно добавить в предыдущий пример дополнительную кнопку и ввести код, приведенный в листинге 4.6.