Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.03.09;
Скачать: CL | DM;

Вниз

#0, AccessViolation   Найти похожие ветки 

 
Tatyana   (2004-02-26 14:21) [0]

У меня есть

List: TString;
s, St: String;
AMassiv: array of array of String;
.......

begin
St := " ";
s := List[1]; //"1 2 3 4"

for j:=0 to Length(s) do
begin
if s[j]<>" " then
St:=St+s[j];// в этом операторе St сначала присваивается
//значение #0, а только затем 1; в следующих
//операциях возникает ошибка AccessViolation
//Вопрос: связано ли это между собой;
// что кодирует #0;
// как избежать этой ошибки


if (St<>"") and((s[j]=" ")or(j=Length(s))) then
begin
SetLength(AMassiv, m, List.Count);
AMassiv[0,0] := St;
inc(m);
St:="";
end;


 
Гаврила   (2004-02-26 14:25) [1]

Во первых
for j:= 1 to Length(s) do



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

Текущий архив: 2004.03.09;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.018 c
4-25970
БВВ
2004-01-02 17:44
2004.03.09
Сообщения Windows


1-25787
Layner
2004-02-26 09:23
2004.03.09
Мастера, посоветуйте, как сделать например 48 TEdit в цикле,


14-25897
Oyster
2004-02-16 12:18
2004.03.09
TblEdit


1-25786
Леприкон
2004-02-25 07:25
2004.03.09
Переход от многодокументного интрефейса к однодокументному


14-25873
TUser
2004-02-16 16:22
2004.03.09
Кому надоели пингвины?