Ver Mensaje Individual
  #9  
Antiguo 29-09-2003
Giniromero Giniromero is offline
Miembro
 
Registrado: may 2003
Ubicación: Madrid
Posts: 296
Reputación: 24
Giniromero Va por buen camino
Hola,

Cita:
Por cierto, has mirado qué sentencia SQL te está lanzando???
con esta no me da problemas,

select ALIASALU, APELALU, CCA, CCCALU, CODPALU, DOMIALU, EMAIL, FNACALU, INFORMALU, INFORMALU2, LASTUPDATE, NACIONAL, NIC, NIFALU, NOMAILALU, NOMALU, NOMCLAN, NUMALU, PAISALU, POBALU, PROFALU, PROVALU, RELAC, RUBRALU, SEXALU, TELFALU, TRATAMIE, TUTOR, VIAALU
from ALUMNOS

WHERE APELALU LIKE 'ROMERO BACHILLER%'
ORDER BY APELALU


Esta SI me da problemas:


select ALIASALU, APELALU, CCA, CCCALU, CODPALU, DOMIALU, EMAIL, FNACALU, INFORMALU, INFORMALU2, LASTUPDATE, NACIONAL, NIC, NIFALU, NOMAILALU, NOMALU, NOMCLAN, NUMALU, PAISALU, POBALU, PROFALU, PROVALU, RELAC, RUBRALU, SEXALU, TELFALU, TRATAMIE, TUTOR, VIAALU
from ALUMNOS

WHERE APELALU LIKE 'ROMERO BACHILLER %'
ORDER BY APELALU

No encuentra en el campo "Apelalu" nada que tenga ese texto, con un espacio detras... y da error


Cita:
El mensaje núnca te aparecerá, ya que haces el Exit antes de mostrar el mensaje
el exit está ahí puesto temporalmente. Se me olvidó borrarlo del código que os mandé.


Estoy echandole un vistazo al try ...except ..end; que me recomiendas, esto es lo que tengo:

try
FrmDModule.TbAlumnos.Open;
except
on E: Exception do begin
str := 'Error abriendo TbAlumnos con el mensaje : ' + E.Message;
Application.MessageBox(PChar(str), 'Atención', MB_OK);
end;
end;

Pero al checkear el código, antes de lanzarlo, me resulta el siguiente error en el delphi:

[Error] selealu.pas(169): '(' expected but ':=' found
[Error] selealu.pas(169): Incompatible types
[Error] selealu.pas(170): '(' expected but ')' found
[Error] selealu.pas(170): Incompatible types

Saludos, y gracias por la ayuda.

Virginia
__________________
Sonrie al mundo, y el mundo te sonreirá :)
Responder Con Cita