Gracias Ñuño por tu cooperación,
Estoy implementando tu ejemplo adaptándolo a mis necesidades, pero cuando envío el archivo recibo el código 500 en http.resultcode, esto me indica que "El servidor encontró una condición inesperada que le impidió cumplir con la solicitud".
Yo creo que debe ser porque faltan partes del encabezado que no he podido encontrar cómo ingresar, como "Accept:", "Referer:", "Accept-Languaje:", "Accept-Encoding:", etc.
Intenté ingresarlo de la siguiente forma:
Código Delphi
[-]HTTP.Headers.add( 'POST /cgi_dte/UPL/DTEUpload HTTP/1.0'+ CRLF +
'Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/vnd.ms-powerpoint, applicatio/ms-excel, application/msword, */*' + CRLF +
'Referer:http://www.empresa.cl'+ CRLF +
'Accept-Languaje: es-cl' + CRLF +
'Content-Type: multipart/form-data: boundary=---------------------------' + Bound + CRLF +
'Accept-Encoding: gzip, deflate' + CRLF +
'Host:https://maullin.sii.cl/cgi_dte/UPL/DTEUpload'+ CRLF +
'Content-Length:' + IntToStr(F.Count) + CRLF +
'Cache_Control: no-cache' + CRLF );
pero me aparece un error de Access Violation.