Função POS

Delphi

01/04/2003

Alguém pode me mandar um exemplo de uma função POS?
Estou querendo fazer uma busca por uma palavra-chave dentro de um campo Blob.

Obrigado pela atenção!


Douglas

Douglas

Curtidas 0

Respostas

Amjorge

Amjorge

01/04/2003

function Pos(Substr: string; S: string): Integer;

exemplo:

var S: string;

begin
S := ´ 123.5´;
{ Convert spaces to zeroes }
while Pos(´ ´, S) > 0 do
S[Pos(´ ´, S)] := ´0´;
end;


GOSTEI 0
POSTAR