Ver Mensaje Individual
  #1  
Antiguo 26-05-2004
ricardocid ricardocid is offline
Registrado
 
Registrado: may 2004
Posts: 7
Reputación: 0
ricardocid Va por buen camino
Question AyUda !!EXAMEN de SQL

Por favor necesito que me ayuden, el viernes tengo que rendir un examen en el trabajo de delphi, me dijieron que mas o menos en lo que consiste y necesito que me ayuden. Trabaje en VisualBasic durante mucho tiempo perfectamente y el traslado a Delphi se me esta complicando.
En primer termino trabaja sobre tablas planas EJ
TABLA: PAISES
REGISTROS
*nombre(campo clave)
*capital
*poblacion
*area
*densidad

Debo poder ingresar un registro si este no existe anteriormente.
Yo tengo pensado hacer
sentencia SQL select nombre from paises where nombre = textbox
luego comparar el resultado
si es nulo
no permito la edicion
si no es nulo
permito la edicion

El problema que al no conocer bien la estructura del codigo no me sale

MODIFICAR, ELIMINAR Y DEMAS YA LO SE HACER PERO NO ME SALE EJECUTAR LA SENTENCIA. Esto es lo que intente

busqueda := t_pais.Text;
QConsulta.Close;
QConsulta.SQL.Text:='Select Nombre from paises where Nombres = : busqueda & ;';
QConsulta.Open;
result :=QConsulta.fields[0].asstring;

POR FAVOR AYUDENME LO MAS EXPLICITO Y DETALLADO QUE PUEDAN SE LOS VOY AGRADECER YA QUE ES POR TRABAJO.
Gracias
Responder Con Cita