Ver Mensaje Individual
  #1  
Antiguo 11-09-2016
spring123 spring123 is offline
Registrado
NULL
 
Registrado: ago 2016
Posts: 8
Reputación: 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