![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
![]() |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
Maldito error.. list index out of bounds (0)
Hola amigos...
En una aplicación que realizo on Delphi 7 e Interbase 6.. me da este maldito error list index out of bounds (0), el cual me tiene los pelos de punta ![]() me explicare que tengo... en el Formulario Principal llamado "menu" tengo la conexión a la DB llamada IDB_Compras, en el formulario llamado "proveedor" tengo : 2 TIBQuery.. IBQ_Select y IBQ_Edit 2 TIBTransaction.. IBT_Select y IBT_Edit Además, en el formulario consta de... 1 DBGrid.. donde muestra un registro de todos los proveedores... boton para agregar, quitar y actualizar datos... cuando ingreso al formulario.. se ejecuta el procedimeinto selecciona.. que es el siguiente
el problema lo tengo para agregar.... y los procedimientos para agregar es
en cuanto al procedimiento Limpia.. solo limpia las Edit que utilizo para ingresar datos... para eliminar un registro utilizo esto.. y funciona bien
se supone que con IBQ_Select realizo todas las sentencias SQL para seleccionar y mostrar en el formulario.. y con IBQ_Edit realizo todas las sentencias de Eliminar, Actualizar y Agregar registros... Antes lo habia utilizado de la misma forma y siempre me funciono.. pero ahora no se que pasa... y eso que instalé todos los programas de nuevo....
__________________
BlueSteel |
#2
|
||||
|
||||
El error se produce porque intentas acceder a un elemento del arreglo de parámetros que no existe, revisa bien la sintaxis de la sentencia INSERT porque seguramente tienes un error.
Saludos |
#3
|
||||
|
||||
¿y si pruebas con la propiedad ParamByName?
IBQ_Edit.ParamByName('P1').AsString := vRut.Text; y te faltan unas comillas al final en : ... "Pro_Comuna","Pro_Fono","Pro_Fax")');
__________________
Última edición por ContraVeneno fecha: 24-05-2006 a las 18:02:08. |
#4
|
||||
|
||||
gracias.. ya lo solucione.... me habia faltado cerrar unas comillas.... que tonto soy...
![]() ![]() ![]() ![]() Las máquinas no se equivocan... los sw. tampoco (weno..salvo windows... ![]()
__________________
BlueSteel |
#5
|
|||
|
|||
![]() BUenas tardes A todos
lo q pasa es q yo estoy iniciando en delphi y tengo q crear una aplicacion pek en delhpi 5 y no tengo ni la mas remota idea de como darle los paarametros al query me presenta el error list index out of bounds(0), si bluesteel dice q es error de sintaxis pero no la veo mal, ademas es una sentencia muy basica miren el codigo Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject); begin AlmacenarQry.CleanupInstance; AlmacenarQry.SQL.add('Insert Into "traslado" ("caso","asunto","program","ing_asig","bd_cono","fecha","tipo")'); AlmacenarQry.SQL.Add('Values(:P1, :P2, :P3, :P4, :P5, :P6, :P7)'); AlmacenarQry.Parameters[0].Value:=Edit1.text AKI SE REBIENTA CON EL LIST INDEX OUT OF BOUNDS ![]() if RadioBUtton2.Checked=True then Begin AlmacenarQry.Parameters[3].Value:=RadioButton2.Caption; end; if RadioBUtton3.Checked=True then Begin AlmacenarQry.Parameters[3].Value:=RadioButton3.Caption; end; if RadioBUtton4.Checked=True then Begin AlmacenarQry.Parameters[3].Value:=RadioButton4.Caption; end; if RadioBUtton5.Checked=True then Begin AlmacenarQry.Parameters[3].Value:=RadioButton5.Caption; end; if RadioBUtton6.Checked=True then if Edit5.Text<> '' then Begin AlmacenarQry.Parameters[3].Value:=Edit5.Text; end; AlmacenarQry.Parameters[3].Value:=Edit4.Text; AlmacenarQry.Parameters[4].Value:=DateTimePicker1.Date; AlmacenarQry.Parameters[5].Value:=COmbobox1.Text; end; serian tan amables de ayudarme a iniciar grax |
#6
|
||||
|
||||
No sé si tenga algo que ver pero esta sentencia:
seguro que no hace bien. Está relacionada con la destrucción de objetos y no debe usarse directamente y menos en este contexto. // Saludos |
#7
|
||||
|
||||
Yo también creo que va por ahí, en lugar de "CleanupInstance" debería ser "SQL.Clear"
__________________
|
#8
|
|||
|
|||
![]() muchachos , cambie el "CleanUpInstance" por el SQL.Clear y me sigue rebentando con el error de list index out of bounds
Estoy desesperado, alguna otra idea ![]() gracias |
#9
|
||||
|
||||
A ver. Yo lo que creo es que por alguna razón no está tomando encontrando los parámetros y puede deberse a alguna cuestión con las comillas, como en el mensaje inicial del hilo.
Justo después de las dos instrucciones AlmacenarQry.SQL.Add, copia el texto de AlmacenarQry.SQL.Text en algún lado, un memo, y pégalo aquí para ver cómo queda la consulta final y así podamos ver más claro dónde está el error. // Saludos |
#10
|
|||
|
|||
Conexion ADO Y Tquery
roman, vea lo noto de raro, es que la conexion es TADOCONNECTION y la query es TQUERY
tendra eso algo q ver? otra pregunta, ehh la query no debe estar almacenda en la bd cierto? grax |
![]() |
|
|
![]() |
||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Error List index out of bounds (14) | AMINOA2R | Firebird e Interbase | 3 | 30-09-2005 00:32:57 |
List Index out of bounds (10)... | sostro | Conexión con bases de datos | 3 | 17-05-2005 17:00:39 |
Error: List Index Out Bounds() | MasterXP | SQL | 4 | 18-02-2005 06:41:06 |
Error (list index out of bounds) en Zeos DBO 6.0.12 | hhuillcen | MySQL | 2 | 09-12-2003 19:44:11 |
List index out of bounds | jmselesan | OOP | 0 | 03-12-2003 15:14:53 |
![]() |
|