mostrar imagem em run time no listview

Delphi

24/04/2016

boa noite,

tenho esse código:

var
ItemAdd: TListViewItem;
ItemIMG: TItemAppearanceObjects;
begin
ListView1.items.Clear;

while not qryClientes.Eof do
begin
ItemAdd:= ListView1.Items.Add;


ItemAdd.Text := qryClientes.FieldByName('nome').AsString;
ItemAdd.Detail := qryClientes.FieldByName('id').AsString;


// ItemIMG.Image:= qryClientes.FieldByName('foto').value; TENTEI ASSIM MAS DA ERRO

qryClientes.Next;
end;

num listview insiro os registros conforme o código acima, funciona. mas para inserir a foto que esta salva no banco de dados, não sei como fazer. já configurei o listview para multdetail e habilitei image. quero mostrar essas imagens sem usar livebinding.

Alguém pode me ajudar?


grato.
Jose Medeiros

Jose Medeiros

Curtidas 0

Respostas

Andre Luis

Andre Luis

24/04/2016

Bom dia.
Estou com o mesmo problema, você conseguiu resolver o problema?
Posta a solução pra gente.
Obrigado.
GOSTEI 0
POSTAR