Fórum DBmemoedit e Campos BLOB #343727
26/07/2007
0
Como eu posso juntar as informações de diversos campos blob em um só campo blob? No caso, somente TEXTO!
Por exemplo: Várias observações sobre lançamentos de compras que eu deveria juntar todas e imprimir num formulário a ser destinado ao cliente.
Agradeço aos que puderem me dar uma dica!
:D
Microbios
Curtir tópico
+ 0Posts
26/07/2007
Adriano Santos
procedure TForm1.Button1Click(Sender: TObject); begin Memo1.Lines.Add(ClientDataSet1.FieldByName(´BLOB1´).AsVariant); Memo1.Lines.Add(ClientDataSet1.FieldByName(´BLOB2´).AsVariant); end;
Aqui eu criei uma tabela que tem dois campos Blob e coloquei um TMemo na tela. Quando pressiono o botão o conteúdo dos dois blobs vão direto para o memo.
Aqui um segundo teste:
Inclui um terceiro blob na tabela e mandei incluir o conteúdo do primeiro e do segundo.
procedure TForm1.Button3Click(Sender: TObject); begin ClientDataSet1.Edit; ClientDataSet1.FieldByName(´BLOB3´).AsVariant := ClientDataSet1.FieldByName(´BLOB1´).AsVariant + ClientDataSet1.FieldByName(´BLOB2´).AsVariant; ClientDataSet1.Post; ClientDataSet1.ApplyUpdates(0); end;
Gostei + 0
26/07/2007
Microbios
Obrigado.
Gostei + 0
26/07/2007
Adriano Santos
Imagina, simples ou não é pra isso que servem os camaradas.
Sempre as ordens.
Abs
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)