Ошибка при работе с ф-цией Copy(S:String,Index,Length:Integer)
При попытке копирования строки с использованием указанной функции происходит ошибка Acces violation at address 00ACB815 in module 'dcc70.dll'. Write of address 0000010. С чем это может быть связано?
Покажи код, в котором происходит ошибка - без него никто ничего не сможет ответить.
S:String;
SMSText:String;
....
....
....
S:='oleg';
SMSText:=Copy(S,1,2);
......
......
......
SMSText:String;
....
....
....
S:='oleg';
SMSText:=Copy(S,1,2);
......
......
......
Создал пустой проект и добавил кнопку. К ней следующий обработчик:
procedure TForm1.Button1Click(Sender: TObject);
Var
S,SMSText:String
begin
S:='oleg';
SMSText:=Copy(S,1,2);
ShowMessage(SMSText);
end;
procedure TForm1.Button1Click(Sender: TObject);
Var
S,SMSText:String
begin
S:='oleg';
SMSText:=Copy(S,1,2);
ShowMessage(SMSText);
end;
