..:: MX Studio Fóruns ::..: Papel de parede com várias resoluções - ..:: MX Studio Fóruns ::..

Jump to content

Publicidade




ATENÇÃO:

Para evitar posts desnecessários e que não influam para o andamento e desenvolvimento do fórum, clique aqui e leia todas as regras.
Page 1 of 1
  • You cannot start a new topic
  • You cannot reply to this topic

Papel de parede com várias resoluções Instalação automática

#1 User is offline   almeida 

  • Group: Membros
  • Posts: 1
  • Joined: 20-March 06

Posted 20 March 2006 - 10:38 AM

Baixei uma dica para instalação de papel de parede, porém minha idéia é ter de mais de 1 opção de papel de parede. Acrescentei um botão 'voltar' na tela de aviso que o papel foi instalado com sucesso, para que a pessoa possa instalar um novo papel de parede. Porém quando o clico no botão voltar ele verifica que o primeiro papel já está instalado e passa direto pela tela das opções dos papéis de parede e vai para a tela de aviso de sucesso da instalação.

Como tenho várias opções de resolução fiz um behavior para cada resolução (480, 800 e 1024), mas quando instalo o primeiro, na volta não fica na tela para escolher outra opção e vai direto para a tela de aviso.
Tentei eliminar a página de aviso da 'instalção feita com sucesso', mas fica travando a apresentação e pipoca o som.

Como não manjo muito de Lingo, gostaria da ajuda de alguém para uma modificação, quando identificar que já existe um dos papeis de parede, permaneça na tela de escolha e se for escolhido outro papel vá para a tela de aviso que a isntalação foi feita com sucesso. É possível ou tem que fazer um novo completamente diferente?

Obs. estou usando os xtras FileXtra4 e BudApi

Segue o behavior:

property fxObj

on beginSprite
fxObj = xtra("FileXtra4").new() --inicializar instancia do xtra
end

on mouseUp
put fxObj.fx_FileCopy(the moviePath & "imagem.bmp", "c:\windows\wp1_800.bmp") -- copiar a imagem p/ o HD
end

on exitFrame
put fxObj.fx_FileExists("c:\windows\wp1_800.bmp") into retVal -- checar se a imagem está na pasta Windows
if retVal = 1 then -- se estiver
baSetWallpaper("c:\windows\wp1_800.bmp", false) -- colocá-la como papel de parede
go to the frame + 1 -- ir p/ próximo frame
else -- se não estiver
go to the frame -- permanecer no frame checando
end if

end

on endSprite
fxObj = 0 -- encerrar instancia do xtra
end
0

Share this topic:


Page 1 of 1
  • You cannot start a new topic
  • You cannot reply to this topic



Publicidade




1 User(s) are reading this topic
0 membro(s), 1 visitante(s) e 0 membros anônimo(s)