2008 11:47:30 -0700
Subject: Res: Res: [delphi-br] funcao no Delphi para retornar conteudo de
strings
Olá pessoal,
É isso aí Rubem, eu estou aprendendo a programar na tora, tenho 26 e estou na
ativa já há dois anos (sou iniciante mesmo, Risos), utilizo um monte de dicas
suas, eu estava
29 Oct 2008 11:29:42 -0700
Subject: Res: [delphi-br] funcao no Delphi para retornar conteudo de strings
Olá pessoal,
Tente isso:
var
StrTemp:
TStringList;
begin
StrTemp := TStringList.Create;
try
ExtractStrings([';'], [], ID;PRODUTO;CUSTO, StrTemp);
ShowMessage(StrTemp.Text);
fi
Dá uma olhada no TStringList. Ele tem uma propriedade Delimiter que você
informará o ';' e depois basta capturar os trechos da linha.
Ex:
vObjString := TStringList.Create;
vObjString.Delimiter:= ';';
vObjString.DelimitedText := 'AAA;BBB;CCC;DDD'
grupo1 := vObjString[0];
grupo2 := vObjStr
: [delphi-br] funcao no Delphi para retornar conteudo de strings
Olá pessoal,
Tente isso:
var
StrTemp:
TStringList;
begin
StrTemp := TStringList.Create;
try
ExtractStrings([';'], [], ‘ID;PRODUTO;CUSTO’, StrTemp);
ShowMessage(StrTemp.Text);
finally
FreeAndNil(StrTemp);
hoogrupos.com.br
Enviadas: Quarta-feira, 29 de Outubro de 2008 15:21:01
Assunto: [delphi-br] funcao no Delphi para retornar conteudo de strings
boa tarde pessoal
Alguém conhece uma função do Delphi que retorne todas as strings depois
do ';', seria o seguinte:
na String ID;PRODUTO;CUST
ext da classe
TStringList, consulte o help do Delphi!
To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Wed, 29 Oct 2008 18:21:01 +0000
Subject: [delphi-br] funcao no Delphi para retornar conteudo de strings
boa tarde pessoal
Alguém conhece uma fu
> na String ID;PRODUTO;CUSTO a função retornaria:
>
> ID
> PRODUTO
> CUSTO
Use um TStringList.
var
s: TStringList;
begin
s := TStringList.Create;
s.Delimiter := ';';
s.DelimitedText := 'ID;PRODUTO;CUSTO';
for i := 0 to s.Count - 1 do
ShowMessage(s[i]);
end;
Jackson Gomes
Tools&Co
boa tarde pessoal
Alguém conhece uma função do Delphi que retorne todas as strings depois
do ';', seria o seguinte:
na String ID;PRODUTO;CUSTO a função retornaria:
ID
PRODUTO
CUSTO
Se no Delphi não tiver, será que alguém conhece algo parecido ?
já tentei de tudo e não estou conseguindo.
obr
8 matches
Mail list logo
