Ola,
Naum conheco o componente citado, mas tenhu uma ideia que talvez possa lhe
ajudar. Creio que deva haver um evento OnMoved ou algo do tipo que seja
executado qndo o usuario esta arrastando o icone. Nesse evento vc poderia
colocar um flag de controle que indicaria para não abrir a tela. Por
exemplo:
{ Variável de controle }
Var
AbrirTela: boolean;
{...}
{No OnMouseDown}
AbrirTela := True;
{No evento de movimentação do icone}
AbrirTela := False;
{No OnClick}
If AbrirTela then
Form2.Show;
Testa ai. Espero ter ajudado.
_____
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de edu_ccp2005
Enviada em: sexta-feira, 3 de novembro de 2006 11:51
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] TEListView - Theme Engine
Bom dia a todos!
Estou com um pequeno problema com um componente e de repente alguém
poderia ajudar...
Estou usando o TEListView como uma barra que eu armazeno ícones.
Clicando e arrastando os ícones, eu posso tanto trocá-los de ordem,
como posso arrastar para uma lixeira e assim, deletar o ícone da barra.
Para abrir a respectiva tela do ícone, está sendo necessário clicar
duas vezes.
O que eu estou tentando fazer é deixar um único clique para abrir a
tela, ao mesmo tempo que se clicar e arrastar o ícone possa ser
arrastado sem que a tela abra.
Este é o meu problema, na verdade. Quando deixo pra abrir com um
clique, ao tentar arrastar ele funciona, porém TAMBÉM abre a tela!
O problema é que quando entro no evento OnMouseDown, se eu arrastar o
ícone ele sai do evento e considera como se tivesse soltado o botão do
mouse [ainda com ele pressionado], por isso não estou conseguindo
tratar este problema...
Tem alguma maneira de fazer isso com este componente??
Desde já agradeço,
Eduardo S. Marçal
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
