| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
Netrunner
Aprendiz
Registrado: Domingo, 7 de Julho de 2013
Mensagens: 236
|
 Enviada: Sex Set 27, 2013 10:19 am Assunto: Listview OnChange |
 |
|
Bom, eu queria que quando mudasse alguma coisa no listview , ele manda uma função, que no caso é uma lista de usuários..
| Citação: | procedure Tinicio.IdsChange(Sender: TObject; Item: TListItem;
Change: TItemChange);
var
i:integer;
begin
for i:= 0 to ids.Items.Count-1 do begin
if (ids.Items.Item[i].Caption='') and (ids.Items.Item[i].SubItems.Strings[0]='')
and (ids.Items.Item[i].SubItems.Strings[1]='')
and (ids.Items.Item[i].SubItems.Strings[2]='')
and(ids.Items.Item[i].SubItems.Strings[3]='')
and (ids.Items.Item[i].SubItems.Strings[4]='')
then begin
//if ids.Items.Count=1 then begin
abort;
end
else
ListaUsuarios(ids);
end;
end; |
porem fica dando error de listbound.. tem algo de errado no meu codigo? |
|
| Voltar ao Topo |
|
 |
cyberdisk
Colaborador
Registrado: Domingo, 4 de Julho de 2010
Mensagens: 2391
Localização: São José dos Campos - SP
|
| Enviada: Sex Set 27, 2013 8:31 pm Assunto: |
|
|
sempre coloque o erro na integra
o erro provavelmente esta no índice dos subitens
abraço
_________________
O conhecimento abre muitas portas |
|
| Voltar ao Topo |
|
|
|
FAQ
Pesquisar
Membros
Grupos
Registrar
Perfil
Entrar e ver Mensagens Particulares
Entrar
