Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.03.10;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 вся ветка

Форум: "Основная";
Текущий архив: 2003.03.10;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.49 MB
Время: 0.008 c
1-29924
Darrin
2003-02-25 13:26
2003.03.10
Как на фоне MDI формы, в центре разместить рисунок???


14-30133
Cr@sh
2003-02-17 20:52
2003.03.10
Первая встреча мастаков в Екатеринбурге!


14-30035
Ketmar
2003-02-22 13:51
2003.03.10
как часто и активно вы используете в программах Assert ы?


9-29687
Fog
2002-10-12 13:51
2003.03.10
3 вопроса про OpenGL


1-29898
Krusader
2003-02-26 17:23
2003.03.10
Что значит это сообщение:





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский