Cita:
|
Empezado por kryna
me exigen que la inclusion, modificacion y eliminacion sea por sql del query y no se como hacerlo.
|
Curioso requerimiento. Paradox, siendo una base de datos de escritorio, funciona mucho mejor con componentes TTable que con TQuery.
En tu consulta
Código SQL
[-]
INSERT INTO especialidad
(cod_especialidad, descripcion_especialidad, orden)
VALUES ('DBEdit1', 'DBEdit2', 'DBEdit3')
supongo que DBEdit1, DBEdit2 y DBEdit3 son los nombres de sendas componentes TDBEdit. Estas componentes son parte de Delphi y el lenguaje SQL sólo entiende de nombres de tablas y campos por lo que debes proporcionarle directamente el contenido de dichas componentes:
Código Delphi
[-]
Query1.SQL.Add(
'VALUES("' + DBEdit1.Text + '","' + DBEdit2.Text + '","' + DBEdit3.Text + '")'
);
Así, si los contenidos de DBEdit1, DBEdit2 y DBEdit3 son 'hugo', 'paco' y 'luis', la línea quedará así:
Código SQL
[-]
VALUES("hugo","paco", "luis")
En la forma en que tú lo haces, el servidor sólo ve cadenas de caracteres 'DBEdit1', 'DBEdit2' y 'DBEdit3' y, dado que no son nombres de campos ni tablas te marca el error.
Otra manera de hacerlo, la recomendada, es usando parámetros. Pones como texto de la consulta en el Query:
Código SQL
[-]
INSERT INTO especialidad
(cod_especialidad, descripcion_especialidad, orden)
VALUES (:valor1, :valor2, :valor3)
Los dos puntos ':' indican que el identificador que sigue es un parámetro y debes proporcionar su valor:
Código Delphi
[-]
Query1.ParamByName('valor1').AsString := DBEdit1.Text;
Query1.ParamByName('valor2').AsString := DBEdit2.Text;
Query1.ParamByName('valor3').AsString := DBEdit3.Text;
De esta manera tienes un código mucho más legible y te evitas confusiones con las comillas (nota las dobles comillas necesarias para SQL que se mezclan con las comillas simples de Delphi en la expresión:
'VALUES("' + DBEdit1.Text + '","' + DBEdit2.Text + '","' + DBEdit3.Text + '")'
Por otra parte, si vas a hacer las inserciones con consultas INSERT de SQL entonces no tiene caso que uses componentes TDBEdit; en su lugar usa componentes Edit.
// Saludos