Текущий архив: 2002.05.27;
Скачать: CL | DM;
Вниз
Variable required Найти похожие ветки
← →
Mush[RUM] (2002-05-16 22:30) [0]Мастера подскажите по чему не выскакивает ошибка 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;
← →
igor_2k © (2002-05-16 22:41) [1]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;
← →
Mush[RUM] (2002-05-16 22:47) [2]нет этот код просто пример... задача конечно не совсем такая :)
то есть посложнее. но смысл тот же и ошибка тоже выскакивает.
← →
igor_2k © (2002-05-16 22:53) [3]тогда конкретенее не совсем понимаю зачем вообще в этом случае переменные:
showmessage(edit1.text) - не але?
← →
ION T © (2002-05-16 23:08) [4]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;
Страницы: 1 вся ветка
Текущий архив: 2002.05.27;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.014 c
