13.01.2015 Views

Объектно-ориентированное программирование на С++ - eDrive

Объектно-ориентированное программирование на С++ - eDrive

Объектно-ориентированное программирование на С++ - eDrive

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

void _ _fastcall TForm1::FormMouseMove (TObject *Sender,<br />

TShiftState Shift, int X, int Y) {<br />

if (drawing) Canvas–>LineTo (X, Y);<br />

}<br />

34<br />

Еще од<strong>на</strong> функция показывает работу методов Delete (удаление букв) и<br />

Length (дли<strong>на</strong> строки) класса AnsiString в операции сцепления первой буквы<br />

слова a, точки и слова b:<br />

void Ifs3 () {<br />

AnsiString a = MyForm–>Edit1–>Text;<br />

AnsiString b = MyForm–>Edit2–>Text;<br />

AnsiString c = a.Delete (2, a.Length () – 1);<br />

if (a > b) MyForm–>Label1–>Caption = c + '.' + b + '\n' + a;<br />

else MyForm–>Label1–>Caption = a + '\n' + c + '.' + b;<br />

}<br />

Составные операторы могут иметь любую глубину вложенности. Но<br />

«вложенный <strong>на</strong>бор операторов if...else иногда <strong>на</strong>поми<strong>на</strong>ет водопровод старого<br />

дома: система работает, но трудно понять, какая труба куда ведет» [9].<br />

Оператор выбора<br />

Оператор выбора служит для организации хода вычислительного процесса<br />

в зависимости от з<strong>на</strong>чения выражения или переменной:<br />

switch (порядковаяПеремен<strong>на</strong>я)<br />

{ case Константа : Выражение…<br />

...<br />

[default : Выражение…] }<br />

После выполнения каждого выражения действие передается следующему<br />

выражению. Для прерывания этой последовательности обработку каждой<br />

константы в операторе выбора завершают оператором break. Выражения,<br />

открываемые лексемой default, рассчитаны <strong>на</strong> обработку незапланированных<br />

з<strong>на</strong>чений логического выражения. Пример:<br />

void Cases () {<br />

AnsiString day;<br />

int n = StrToInt (MyForm–>Edit1–>Text);<br />

switch (n) {<br />

case 1: day = "Понедельник"; break;<br />

case 2: day = "Вторник"; break;<br />

case 3: day = "Среда"; break;

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!