Объектно-ориентированное программирование на С++ - eDrive
Объектно-ориентированное программирование на С++ - eDrive
Объектно-ориентированное программирование на С++ - eDrive
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;