title: Delphi, error :"Access violation at address xxxxxxxx. Read of address yyyyyyyy", at AdoQuery.SQL.Text:='''
body: <blockquote>
    <p>"Access violation at address xxxxxxxx. Read of address yyyyyyyy"</p>
  </blockquote>
  
  <p>On this project i have more than 200 procedures like that, but only this procedure gets error (only windows xp)..</p>
  
  <p>Procedure than have error : </p>
  
  <pre><code>Procedure TfMain.CreateNewDocument(p_money_direction,p_status,p_base:integer);
  begin
    With fMain.ADOTemp  do
    Begin
      SQL.Clear;
      SQL.Text:='INSERT INTO documents '+
                '(document_date,fk_id_status,money_direction,'+
                'paid,addition,saving,fk_id_base,fk_id_user)'+
                'VALUES '+
                '(CONVERT(DATE,:pdocument_date,103),:pfk_id_status,'+
                ':pmoney_direction,0,0,0,:pfk_id_base,:pfk_id_user)';
      Parameters.ParamByName('pdocument_date').Value:=Date;
      Parameters.ParamByName('pfk_id_status').Value:=p_status;
      Parameters.ParamByName('pmoney_direction').Value:=p_money_direction;
      Parameters.ParamByName('pfk_id_base').Value:=p_base;
      Parameters.ParamByName('pfk_id_user').Value:=fMain.ApplicationVariablers.user_id;
      ExecSQL;
    End;
  end;
  </code></pre>
  
  <p>Error at :</p>
  
  <pre><code>    SQL.Text:='INSERT INTO documents '+
                '(document_date,fk_id_status,money_direction,'+
                'paid,addition,saving,fk_id_base,fk_id_user)'+
                'VALUES '+
                '(CONVERT(DATE,:pdocument_date,103),:pfk_id_status,'+
                ':pmoney_direction,0,0,0,:pfk_id_base,:pfk_id_user)';
  </code></pre>
  
  <p>Debuingging process, error at line 1907 :</p>
  
  <p><a href="https://i.stack.imgur.com/zAbnm.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/zAbnm.png" alt="print screen"></a>
  </p>