Скачать: CL | DM;

Объясните, пожалуйста   Найти похожие ветки 

← →
Silica ©   (2005-12-18 20:25) [0]

function TForm1.WETP(St1:string):boolean;
var i:integer;
begin
 wetp:=false;
 for i:=1 to pp-1 do
   if (st1=words_tab[i]) then wetp:=true
end;

Данная функция проверяет наличие слова st1 в массиве (в Memo). Объясните пожалуйста, что означает строчка

for i:=1 to pp-1 do

а именно pp-1.

---

← →
mfender ©   (2005-12-18 20:30) [1]

Из приведённого кода это неизвестно.
Вероятно, это находится в глобальной области.

---

← →
Silica ©   (2005-12-18 20:34) [2]

В программе есть еще такая строчка:

words_tab[Pp]:=ss;
pp:=pp+1;

все переменные описаны в области var в начале модуля.

---

← →
mfender ©   (2005-12-18 20:38) [3]

> все переменные описаны в области var в начале модуля.

Это плохо. Вообще, глобальными переменными лучше вообще не пользоваться. Нехорошо это. Лучше передавать всё в процедуры и функции, а всё остальное писать в файлы.

pp, следует предположить, глобальный счётчик элементов массива words_tab.

---

← →
Silica ©   (2005-12-18 20:54) [4]

А что тогда делает pp-1? Проверяет слова в обратном порядке в Memo?

А:
words_tab[Pp]:=ss;
pp:=pp+1;

pp:=pp+1 это добавление одного элемента в массив, вниз?

---

← →
mfender ©   (2005-12-18 21:02) [5]

for i:=1 to pp-1 do - здесь pp-1 означает, что цикл будет работать с 1 до pp <минус> 1. Просто, если pp - количество элементов массива, то если не сделать pp-1, то в конце цикла курсор массива переместится на несуществующий элемент и вызовет критическую ошибку.

pp := pp+1 - это не добавление элемента. Это увеличение переменной pp на единицу.

---

← →
Silica ©   (2005-12-18 21:13) [6]

Охрамедное спасибо!!! :)))

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c