Главная страница
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
14-25921
D@rk
2004-02-15 19:03
2004.03.09
Подскажите плиз


1-25746
KA
2004-02-26 17:27
2004.03.09
Переделать диалог.


7-25957
Japan
2003-12-13 16:03
2004.03.09
При сохранении файла притормаживает


6-25838
Shagrath
2004-01-03 14:20
2004.03.09
TServerSocket TClientSocket в Delphi7


7-25955
Skyhawk
2003-12-19 17:29
2004.03.09
COM сервер