Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > Tablas planas
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 11-09-2016
spring123 spring123 is offline
Registrado
NULL
 
Registrado: ago 2016
Posts: 8
Poder: 0
spring123 Va por buen camino
Delphi Access

Buenas disculpen la molestia pero tengo una Duda..que espero que me ayuden!...no se que hacer y estoy trancado en esto!..

estoy haciendo un sistemita normalito en donde lo unico que quiero es lo siguiente, conecto un ADOConnection, y ADOTable, con una base de datos que tengo en Access...y quiero que en un ComboBox, pueda seleccionar lo qeu hay en la tabla ERROR(campo1), y al Darle en un boton Buscar , se me muestre en un memo la SOLUCION de un problema...


(la tabla tiene 2 campos, Error y solucion) repito, quiero que ne el combobox se muestre el error, y en el memo la solucion, usando el boton para bucar la solucion.... uso este Codigo:


Código Delphi [-]
begin
x:=0;
dm.ADOTable1.open;
dm.ADOTable1.First;
       while x<>dm.ADOTable1.recordcount do
       begin
        ComboBox1.items.add(dm.ADOTable1.fieldbyname('Error_5S').Asstring);
        dm.ADOTable1.Next;
        x:=x+1;
end;


y en el button uso este codigo

Código Delphi [-]
begin
dm.ADOTable1.Open;
    Memo1.lines.clear;
If Dm.ADOTable1.Locate('Error_5S',ComboBox1.Text,[]) then
    Memo1.lines.add(dm.ADOTable1.fieldbyname('Solucion_5S').Asstring);
dm.ADOTable1.Close;
end;

Pero cuando lo Corro, que lo usare! Me carga sin problemas los ERRORES en el combobox!...pero cuando le doy a buscar para que me muestre la SOLUCION en elMEMO!...me tira este error que es el que me tiene estresado...


Project Project1.exe, raised exception class EOleException with message 'No se puede aplicar el criterio de ordenacion'. Process stopped. Use step or Run to Continue.

me dice queel problema esta aqui:


Código Delphi [-]
If Dm.ADOTable1.Locate('Error_5S',ComboBox1.Text,[]) then
Responder Con Cita
  #2  
Antiguo 12-09-2016
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.271
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
¿Es posible que tengas activadas las excepciones en diseño?
¿Si le das a continuar, qué hace?

Para el tema de las excepciones revisa este link.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Access y Delphi largei Conexión con bases de datos 14 23-07-2008 21:05:22
Delphi con Access en red gabirojas Conexión con bases de datos 12 05-03-2008 13:52:46
Access con delphi javikanin Conexión con bases de datos 0 26-11-2004 14:00:00
SQL de Access a Delphi Anunakis Tablas planas 6 14-07-2004 14:50:30
Delphi 6 y Access esocrates Conexión con bases de datos 4 04-09-2003 19:28:09


La franja horaria es GMT +2. Ahora son las 21:24:42.


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