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

Что значит это сообщение:   Найти похожие ветки 

← →
Krusader   (2003-02-26 17:23) [0]

[Warning] Unit1.pas(1): For loop control variable must be simple local variable

Примерно в таком коде:

For n:=x to b do
…

Спасибо.

---

← →
Reindeer Moss Eater   (2003-02-26 17:25) [1]

Переменная цикла должна быть простой и локальной

---

← →
Smashich ©   (2003-02-26 17:28) [2]

ты очевидно написал что то вроде

procedure F;
var
i:integer;
procedure sF;
begin
...
For i:=1 to 4 do
...
end;
begin
....
sF;
...
end;

а так низя!!!

---

← →
Krusader   (2003-02-26 17:41) [3]

Что-то в этом роде:

Procedure A;
Var
x,
i,
e : Integer;
Begin
x := x+1;
ShowMessage(inttostr(i));
e := 20;
End;

Procedure B;
Begin
For i:=x to e do
…
End;

Так значит незя, да?
А как же тогда обойти, еще одну переменную?

Спасибо.

---

← →
Smashich ©   (2003-02-26 17:42) [4]

2 Krusader (26.02.03 17:41) агамс

---

← →
Krusader   (2003-02-26 17:42) [5]

ой, не так, вот-так:


Var
x,
i,
e : Integer;


Procedure A;
Begin
x := x+1;
ShowMessage(inttostr(i));
e := 20;
End;

Procedure B;
Begin
For i:=x to e do
…
End;

---

← →
Krusader   (2003-02-26 17:43) [6]

> Smashich © (26.02.03 17:42)

Но работает же :)

---

← →
Smashich ©   (2003-02-26 17:43) [7]

и так тожа нельзя - в сообщении теж написали
For loop control variable must be SIMPLE LOCAL variable

---

← →
Smashich ©   (2003-02-26 17:44) [8]

2 Krusader (26.02.03 17:43)
это где же и чего у тя работает можна узнать??

---

← →
Krusader   (2003-02-26 17:45) [9]

> Smashich © (26.02.03 17:43)

Это тотже код.

---

← →
Smashich ©   (2003-02-26 17:46) [10]

procedure F;
var
i:byte;
procedure sF;
begin
for i:=0 to 1 do
Beep;
end;

попробуй скомпили;)

---

← →
Krusader   (2003-02-26 17:46) [11]

> Smashich © (26.02.03 17:44)

Я имею ввиду, предупреждение есть, но код та работает нормально...

---

← →
Smashich ©   (2003-02-26 17:48) [12]

где и чего тот же код? ты прочитай внимательно чего я те пишу!

короче! те нужна еще одна переменная - простая и локальная
т.е.
procedure F;
var
i:byte;
procedure sF;
var
j:byte;
begin
for j:=0 to 1 do
Beep;
end;
begin
end;

---

← →
Krusader   (2003-02-26 17:48) [13]

> Smashich © (26.02.03 17:46)

знаю, выходит:

[Error] Unit1.pas(1): For loop control variable must be simple local variable

а у меня:

[Warning] Unit1.pas(1): For loop control variable must be simple local variable

разницу видишь :)
Потому и работает...

---

← →
Krusader   (2003-02-26 17:49) [14]

И без всяких лишних переменных...

---

← →
Krusader   (2003-02-26 17:49) [15]

Но сообщение бесит

---

← →
Smashich ©   (2003-02-26 17:49) [16]

чес слово не знаю где и чего ты там сделал но
procedure F;
var
i:byte;
procedure sF;
begin
for i:=0 to 1 do
Beep;
end;
begin
sF;
end;

не компилиться!!!

---

← →
Smashich ©   (2003-02-26 17:50) [17]

ну если бесит так используй переменую! оно как то без глобальных переменных то понадежнее...

---

← →
Krusader   (2003-02-26 17:51) [18]

> Smashich © (26.02.03 17:49)

Это нет, error выходит, а у меня обсолютно такойже как и error только Warning...
:)))))

---

← →
Krusader   (2003-02-26 17:52) [19]

Прям чат....

Ладно, так сгодится... :)))

---

← →
Smashich ©   (2003-02-26 17:53) [20]

ну чего пристал! глобальная переменная дает предупреждение - я знаю, если тя бесит сообщене используй локальную переменную - вот и все...если уверен в сохроанности данных в глобальной переменной - вперед

---

← →
Krusader   (2003-02-26 17:54) [21]

> Smashich © (26.02.03 17:53)

цыть. знаю.

---

← →
Smashich ©   (2003-02-26 17:59) [22]

чего ж тады развел то муть то здесь? а? круасан?;)

---

← →
Krusader   (2003-02-26 18:03) [23]

уже знаю.
;)

---

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

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



Память: 0.49 MB
Время: 0.011 c