Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 15-07-2004
UTECYBER UTECYBER is offline
Miembro
 
Registrado: ago 2003
Posts: 60
Poder: 22
UTECYBER Va por buen camino
Question Problemas de Consulta

Tengo varias consultas(Consulta de Cliente,Proveedor,Etc, con este codigo

If Not (Dm_BaseDatos.TblCliente.Locate(Combobox1.Text,TxtValor1.Text,[LoCaseInsensitive,Lopartialkey])) Then
messageDlg('Este Cliente No Existe,Favor Registrarlo',MtError,[MbOk],0);
Exit;

Ahora bien, Estoy elaborando otra consulta pero esta vez de Producto. con el mismo codigo pero esta vez con la tabla de producto
If Not (Dm_BaseDatos.TblProducto.Locate(Combobox1.Text,TxtValor.Text,[LoCaseInsensitive,Lopartialkey])) Then
messageDlg('Este Producto No Existe,Verifique el Reemplazo',MtError,[MbOk],0);
Exit;

El sistema me esta dando este error. Al momento de introducir el codigo de consulta en la consulta del producto,
en realidad no se porque, porque en los otros me funciona correctamente.
[Error] FCProductos.pas(99): Undeclared identifier: 'LoCaseInsensitive'
[Error] FCProductos.pas(99): Undeclared identifier: 'Lopartialkey'
[Error] FCProductos.pas(99): Incompatible types: 'TLocateOption' and 'Integer'


Otros metodos de consulta que podrian facilitarme?

Atentamente,
Utecyber


¿Que tan ecuánime es para el Ser entender lo Inerte?
Responder Con Cita
  #2  
Antiguo 15-07-2004
Avatar de ruina
ruina ruina is offline
Miembro
 
Registrado: jun 2004
Posts: 196
Poder: 21
ruina Va por buen camino
mira a ver con un uses DB
Responder Con Cita
  #3  
Antiguo 15-07-2004
Avatar de ruina
ruina ruina is offline
Miembro
 
Registrado: jun 2004
Posts: 196
Poder: 21
ruina Va por buen camino
ahora que veo el código 2 veces....


¿porque messagesDlg? ¿porque no excepciones?
Responder Con Cita
  #4  
Antiguo 15-07-2004
UTECYBER UTECYBER is offline
Miembro
 
Registrado: ago 2003
Posts: 60
Poder: 22
UTECYBER Va por buen camino
Question

Ok, Como tu crees que puedo hacerlo usando excepciones.?
-A otra cosa, El TForm esta usandon el DM_BaseDatos.

Ate,
Utecyber,
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 01:54:45.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi