Delphi 2010, MS SQL 2000
Код:
TableCurDeb.Active:=true;
TableCurDeb.First;
QueryUpdate.Close;
for i := 1 to TableCurDeb.RecordCount do
begin
if i<>TableCurDeb.RecordCount then QueryUpdate.SQL.Add(''''+s[i]+''',')
else QueryUpdate1.SQL.Add(''''+s[i]+''')');
end;
Вот такой вот код - QueryUpdate.SQL.Add(''''+s[i]+''',') вот здесь выдает ошибку access violation at address 0056E628 in module 'PrContralDeb.exe'. Read of address 00000000'
просматривал код, заново создавал ADOQuery. Все равно при попытке что-то вставить в SQL выдает ошибку
Вот так тоже пробовал присвоение, точно такую же ошибку выдает QueryUpdate.SQL[23]:=''''+s[i]+''',';
Вот то, что на ЦПУ в потоке при ошибке.
Прямо скажу в Ассемблере не оч мягко говоря разбираюсь.
Цитата:
75D9B727 C9 leave
75D9B728 C21000 ret $0010
75D9B72B CC int 3
75D9B72C CC int 3
75D9B72D CC int 3
75D9B72E CC int 3
75D9B72F CC int 3
KERNELBASE.CloseHandle:
75D9B730 8BFF mov edi,edi
75D9B732 55 push ebp
75D9B733 8BEC mov ebp,esp
75D9B735 56 push esi
75D9B736 8B7508 mov esi,[ebp+$08]
75D9B739 83FEF4 cmp esi,-$0c
75D9B73C 7218 jb $75d9b756
75D9B73E 83FEF6 cmp esi,-$0a
75D9B741 7713 jnbe $75d9b756
75D9B743 8D4508 lea eax,[ebp+$08]
75D9B746 50 push eax
75D9B747 6A00 push $00
75D9B749 56 push esi
75D9B74A E8DD020000 call $75d9ba2c
75D9B74F 85C0 test eax,eax
75D9B751 7403 jz $75d9b756
75D9B753 8B7508 mov esi,[ebp+$08]
75D9B756 56 push esi
75D9B757 FF153C10D975 call dword ptr [$75d9103c]
|