Luciano,
Use uma stringlist para isto.
Ex.:
procedure TForm1.Button1Click(Sender: TObject);
var
minhaStringList : tStrings;
begin
minhaStringList:=TStringList.Create;
with minhaStringList do
begin
Delimiter:='#';
Text:=MeuArquivo.FIeldByname('CampoBlob').AsString;
end;
end;
Pessoal estou com o seguinte problema
Estou fazendo importação de um arquivo para outro e um dos campos é campo memo.
Então eu tenho uma string que é: "Fazendo Teste#Continuando a fazer teste"
Eu quero encontrar a String "#" e armazenar o "Fazendo Teste" na primeira linha
de TMemo ou TDMemo e d
2 matches
Mail list logo