Ver Mensaje Individual
  #1  
Antiguo 18-08-2012
Avatar de martini002
martini002 martini002 is offline
Miembro
 
Registrado: may 2012
Ubicación: Puerto Ordaz - Venezuela
Posts: 175
Reputación: 15
martini002 Va por buen camino
Problema de seleccion en BD

Saludos amigos, donde quiera que se encuentren.

En esta ocasion tengo un inconveniente bastante desconcertante,
porque segun he visto en algunos tutoriales, y pues usando el sentido comun
he intentado hacer esto(Me falla el sentido comun ahora :S):

Esto es un ejercicio para conocer como funciona este proceso,
pues lo he querido aprender, por lo util que es,
la cuestion es que tengo una BD con varios campos,
y quiero ingresar un codigo, y que este busque el codigo
y me devuelva el nombre del articulo, entonces he intentado hacerlo de esta manera:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  Codigo:String;
begin
  Codigo:=Form1.Edit1.Text;
  if FileExists (ZConnection1.Database) then
    begin
      ZQuery1.Close;
      ZQuery1.SQL.Text:= 'SELECT NombreArticulo FROM InventarioArticulos WHERE CodigoArticulo = '+Codigo;
      ZQuery1.Open;
    end
  Else
  ShowMessage('BD No encontrada');
end;

El ZQuery esta conectado con el ZConnection, y con el DataSource,
ahora en la parte grafica Tenemos, un Edit, para leer el codigo,
y un DBEdit para mostrar el resultado, ese DBEdit tiene en su DataField, "NombreArticulo"
pero la cuestion es que cuando activo la aplicacion,
ya me tiene el nombre del producto escrito de una vez,
ahora cuando ingreso el codigo en este caso 101,
y le doy click, me arroja error,

Código:
SQL Error or missing database.
como siempre ya no se que pueda hacer, pues son mis primeros pasos
muchas gracias por su tiempo y ayuda
Responder Con Cita