Äðóãîé ñïîñîá óïðàâëÿòü îñòàíîâêîé ïðîãðàììû
Äðóãîé ñïîñîá óïðàâëÿòü îñòàíîâêîé ïðîãðàììû ñîñòîèò â èñ-
ïîëüçîâàíèè òî÷åê îñòàíîâà. Ïðîñòåéøèé ñïîñîá çàäàòü òî÷êè îñòà-
íîâà çàêëþ÷àåòñÿ â èñïîëüçîâàíèè êëàâèøè F2. Ïåðåìåñòèòå êóðñîð
íà ñòðîêó 121 è íàæìèòå F2. Òóðáî îòëàä÷èê ïîäñâå÷èâàåò ñòðîêó,
ïîêàçûâàÿ, ÷òî íà íåé óñòàíîâëåíà òî÷êà îñòàíîâà.
Òî÷êè îñòàíîâà ìîæíî óñòàíàâëèâàòü è îòìåíÿòü òàêæå ñ ïî-
ìîùüþ "ìûøè". Äëÿ ýòîãî íóæíî ïåðåìåñòèòüñÿ íà ïåðâóþ èëè âòîðóþ
ïîçèöèþ îêíà Module è íàæàòü êíîïêó "ìûøè".
----------------------------------------------------------------¬
¦¨ File Edit View Run Breakpoints Data Options Window Help READY¦
¦ã=[*]=Module: TPDEMO file: TPDEMO.PAS 121============1=[ ][ ]¬¦
¦¦ i : integer; ^¦
¦¦ WordLen : Word; -¦
¦¦ -¦
¦¦ begin { ProcessLine } -¦
¦¦> Inc(NumLines); -¦
¦¦ i := 1; -¦
¦¦ while i <= Length(S) do -¦
¦¦ begin -¦
¦¦ { Ïðîïóñòèòü íå áóêâû } -¦
¦¦ while (i <= Length(S)) and not IsLetter(S[i]) do -¦
¦¦ Inc(i); -¦
¦¦ -¦
¦¦ { Íàéòè êîíåö ñëîâà, îáðàáîòàòü ñ÷åò÷èêè áóêâ è ñëîâ } -¦
¦¦ WordLen := 0; -¦
¦¦ while (i <= Length(S)) and IsLetter(S[i]) do -¦
¦¦ begin -¦
¦¦ Inc(NumLetters); -¦