| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Variable required [D5, Win95/98]
Mush[RUM] © (2002-05-16 22:30:00)Мастера подскажите по чему не выскакивает ошибка Variable required?
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
w:string;
begin
for i:=1 to 6 do begin
move((edit1.text),w,1); //вот на это место указывает говорит что с w не все в порядке
showmessage(w);
end;
end;
ION T (2002-05-16 23:08:00) [1]edit1.text - не переменная (а как раз на неё тыкает компилятор, а не на w). Одно из решений:
procedure TForm1.Button1Click(Sender: TObject);
var i: integer;
s, w: string;
begin
SetLength(w, 256);
for i:= 1 to 6 do
begin
s:= edit1.Text;
move(s, w, 1);
showmessage(s);
end;
end;
igor_2k (2002-05-16 22:53:00) [2]тогда конкретенее не совсем понимаю зачем вообще в этом случае переменные:
showmessage(edit1.text) - не але?
Mush[RUM] (2002-05-16 22:47:00) [3]нет этот код просто пример... задача конечно не совсем такая :)
то есть посложнее. но смысл тот же и ошибка тоже выскакивает.
igor_2k (2002-05-16 22:41:00) [4]procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
w:string;
begin
for i:=1 to 6 do begin
w:=edit1.text; - (* попробуй заменить свою строку - просто первое что пришло в голову *)
showmessage(w);
end;
end;
| |
