Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   SQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=6)
-   -   Localizar un caracter y cambiarlo por otro (https://www.clubdelphi.com/foros/showthread.php?t=26196)

olbeup 16-10-2005 14:40:40

Localizar un caracter y cambiarlo por otro
 
Hola Gente,

El problema que tengo es el siguiente, he transferido un fichero "Client.dbf" a una tabla "Clientes" en access que se llama "Clientes.MDB", en la transferencia la letra "Ñ" se a puesto otro simbolo "ö", localizo los registros que contiene este simbolo con la siguiente sentencia:

Código:

Select * From Cliente Where Nombre Like "*ö*";
¿Como puedo localizar la posición del "ö" y cambiar por "Ñ" en la misma posición?

Gracias,

Saludos.

Sotrono 16-10-2005 16:16:47

Hola, lo podes hacer con la funcion StringReplace:

Código Delphi [-]
  s:= ValorACambiar;
  StringReplace(s, 'ö', 'ñ', rfReplaceAll);

Espero que te sirva...

olbeup 16-10-2005 16:36:40

Gracias por tu respuesto sotrono,

Pero cual seria la secuencia de SQL para realizar tal tarea,:confused:

Gracias.

Chente(rMan) 16-12-2005 19:56:45

Que tal sotrono, pues fijate que estoy intentando usarlo pero me marca un error:

Incompatible types: 'TReplaceFlags' and 'Enumeration'


Tengo Delphi 6, y en la ayuda veo que utiliza SysUtils, que si tengo en mi form.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var s : string;
begin
  s := ADOQuery1.FieldByName('rutaarchivo').AsString;
  StringReplace(s, 'PJ1', 'PJ2', rfReplaceAll)  ;
  Edit2.Text := s;
end;
Cual sera el problema?, alguien que me pueda ayudar...


Saludos.

Vicente López.

roman 16-12-2005 20:01:45

Cita:

Empezado por Chente(rMan)
Cual sera el problema?

Pon el rfReplaceAll entre corchetes:

[rfReplaceAll]

// Saludos

Chente(rMan) 16-12-2005 20:17:25

Excelente Román, tienes toda la razón y creo que es por esto.

Código Delphi [-]
type
  TReplaceFlags = set of (rfReplaceAll, rfIgnoreCase);



Saludos.

Vicente López.


La franja horaria es GMT +2. Ahora son las 20:49:30.

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