Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 12-05-2017
TheRafa TheRafa is offline
Miembro
 
Registrado: abr 2005
Posts: 18
Poder: 0
TheRafa Va por buen camino
Preparar cadena para Sql

Hola compañeros,
Llevo unos días dándole vueltas al problema por el cual la siguiente función ha dejado de funcionar al pasar de delphi 3 a delphi XE6. Es una función que prepara las cadenas para poderselas pasar antes a un TwwQuery.sql, ahora a un TFDQuery.sql, antes cualquier cadena que le pasara la devolvía entre comillas simples para que luego el qry la interpretara, pero ahora con XE6, siendo la misma función me la devuelve entre comillas dobles. Me podeis ayudar a ver donde estoy metiendo la pata o que ha cambiado que desconozco. Muchas gracias de antemano y un saludo.

Código Delphi [-]
(*                        Preparar cadena para SQL                            *)

function CadenaSQL(const Cad: String): String;
var I: Integer;
    Aux: String;
begin
  Aux := '';

  for I := 1 to Length(Cad) do
    begin
      Aux := Aux+Cad[i];
      if Cad[i] = '''' then Aux := Aux+'''';
    end;

  Aux := trim(Aux);
  if CadenaVacia(Aux)
    then Aux := 'NULL'
    else Aux := ''''+Aux+'''';

  CadenaSQL := Aux;
end;

Última edición por roman fecha: 12-05-2017 a las 17:10:04. Razón: Colocar etiquetas [delphi]..[/delphi]
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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
Funciones para limpiar y buscar una cadena en otra cadena o en un fichero xaguilars Trucos 1 29-07-2007 22:20:14
Funcion para borrar la cadena que aparesca repetida dentro de otra cadena flystar Varios 1 02-07-2007 23:51:10
Funcion para buscar cadena dentro de otra cadena y el numero de veces flystar Varios 3 02-07-2007 22:48:08
Preparar BD sin dependencias Deiv Varios 10 24-01-2007 02:17:17
Preparar pagina en PReport ElCherchu Impresión 5 23-06-2003 16:15:52


La franja horaria es GMT +2. Ahora son las 19:22:09.


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