GARANTIR DESCONTO

Fórum Alterar uma string #596724

27/08/2018

0

Amigos, vou tentar explicar o que preciso.

Em um campo memo tem uma frase:
O cliente [nome] e identidade numero [identidade] residente [endereco].

Preciso trocar [nome] [identidade] [endereco] pelas variáveis criadas vnome, videntidade e vendereco.

Como faço isso? Alguma ideia?

Deste já obrigado.
Jorge Junior

Jorge Junior

Responder

Post mais votado

11/09/2018

Fala Jorge!

Para isso você pode usar o método StringReplace do Delphi. Abaixo deixo um esboço que fiz para a solução do seu problema e o link para um artigo que explica o uso do StringReplace:

procedure TForm1.Button1Click(Sender: TObject);
var
ConteudoAtualMemo: String;
NovoConteudoMemo: String;
VNome: String;
begin
VNome := 'Fabricio';

//Guardo o conteúdo atual do Memo em uma variável
ConteudoAtualMemo := Memo1.Lines.Text;

// uso o StringReplace para substituir o indicar [nome] pelo valor definido na variável VMemo
NovoConteudoMemo := StringReplace(ConteudoAtualMemo, '[nome]', VNome, [rfReplaceAll]);

// por fim, atribuo o novo conteúdo ao Memo
Memo1.Lines.Text := NovoConteudoMemo;
end;

Link para um artigo sobre StringReplace: https://www.devmedia.com.br/delphi-stringreplace-como-utilizar-a-funcao-stringreplace-no-delphi/13222

Espero que tenha te ajudado.

Abraço!

Fabricio Kawata

Fabricio Kawata
Responder

Gostei + 2

Mais Posts

11/09/2018

Jorge Junior

Show de bola Fabricio Kawata
Era isso mesmo que precisava, muito obrigado mesmo.
Responder

Gostei + 0

12/09/2018

Fabricio Kawata

Show de bola Fabricio Kawata
Era isso mesmo que precisava, muito obrigado mesmo.


Disponha Jorge. Bons desenvolvimentos aí.

Abraço!
Responder

Gostei + 0

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

Aceitar