PAGUE 6 MESES
LEVE 12 MESES
GARANTIR DESCONTO

Fórum Alterar imagem do item do treeview #412192

31/01/2012

0

Pessoal, boa tarde. Tenho um treeview para cadastro de perfil e as configurações desse perfil onde tenho por exemplo:
[+]ADMINISTRATIVO
...Backup(Imagem de permissao)
...Perfil(Imagem de nao permissao)
[+]CADASTROS
...Clientes(Imagem de nao permissao)
...Fornecedores(Imagem de permissao)

Ao lado de cada item do nó tem a imagem correspondente de permissão e não permissão. Até aqui esta funcionando perfeito, agora gostaria que quando desse duplo clique em um item, por exemplo, Backup trocasse a imagem para a
imagem de não permissão e visse versa. Estou tentando com o seguinte codigo:
procedure TFormCadPerfil.TvwTipsDblClick(Sender: TObject);
var
i : integer;
begin
i := TvwTips.Selected.Index;

TvwTips.Items.BeginUpdate;
if TvwTips.Items[i].ImageIndex = 0 then
begin
TvwTips.Items[i].ImageIndex := 1;
TvwTips.Items[i].StateIndex := 1;
end
else
begin
TvwTips.Items[i].ImageIndex := 0;
TvwTips.Items[i].StateIndex := 0;
end;
TvwTips.Items.EndUpdate;
end;

Valeu.
Jordelino Santos

Jordelino Santos

Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar