Fórum apagar um caracter de um campo da tabela #166341

25/06/2003

0

Delphi

Quero apagar somente um caracter do campo de uma tabela, e esse caracter está na primeira posição.

Ex.:

Tabela Cliente, no campo nome tem a seguinte informação.
* Ronaldo Pereira Silva

Quero apagar o ´*´

Como faço isso?

Obrigada


Debora

Debora

Responder

Posts

25/06/2003

Flávio Luiz

Bom Debora, tem varias maneiras de fazer isso mas a mais simples
é a seguinte:

tabela[CAMPO] := copy(tabela.fieldbyname(´CAMPO´).asstring,2,tamanho do campo -1);

ok...espero que ajude
Flavio


Responder

Gostei + 0

25/06/2003

Flávio Luiz

Bom Debora, tem varias maneiras de fazer isso mas a mais simples
é a seguinte:

tabela[CAMPO] := copy(tabela.fieldbyname(´CAMPO´).asstring,2,tamanho do campo -1);

ok...espero que ajude
Flavio


Responder

Gostei + 0

25/06/2003

Thaisandrade

Debora, fiz uma função que faz isso:

Ex.:

DeleteChar(´*Ronaldo´,´*´);

A função retira todo os ´*´ que encontrar.

function DeleteChars(Texto, Char: string): string;
var
x: integer;
begin
if (Trim(Char) = ´´) or (Trim(Texto) = ´´) then
begin
end;
for x:= 0 to Length(Char) do
begin
while Pos(Char[x],Texto) > 0 do
Delete(Texto,Pos(Char[x],Texto),1)
end;
Result:= Texto;
end;


Responder

Gostei + 0

26/06/2003

Bilouro 

UPDATE TABELA_CLIENTE
  SET NOME = SUBSTRING(NOME,2,LEN(NOME))
 WHERE SUBSTRING(NOME,1,1) = ´*´


forte abraço!


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar