ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Problema ao alterar a imagem de fundo

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
lokasso
Aprendiz
Aprendiz


Registrado: Terça-Feira, 11 de Abril de 2017
Mensagens: 174

MensagemEnviada: Sex Dez 08, 2017 6:26 am    Assunto: Problema ao alterar a imagem de fundo Responder com Citação

Galera, estou tento um erro ao alterar a foto de fundo principal, pois somente muda a foto automaticamente quando aperto F4 ou F9, pois no modo normal, nada acontece, precisa fechar para que ocorra a mudança.

Citação:
Código da procedure e do botao procurar:
Código:
procedure TFrm_Config.CarregaFundo;
begin
  if OpenFundo.Execute then
    begin
      Fundo:= OpenFundo.FileName;
      FileName:= ExtractFilePath(Application.ExeName) + 'config.ini';
      SetValorIni(FileName, 'APARÊNCIA','FUNDO', Fundo);
    end;
end;

Código:
procedure TFrm_Config.Btn_ProcurarClick(Sender: TObject);
begin
  CarregaFundo;
  Frm_Principal.I_Principal.Picture.LoadFromFile(GetValorIni(ExtractFilePath(Application.ExeName) +
      'config.ini', 'APARÊNCIA','FUNDO'));
  I_Fundo.Picture.LoadFromFile(GetValorIni(ExtractFilePath(Application.ExeName) +
      'config.ini', 'APARÊNCIA','FUNDO'));
end;


O que poderia ser?

Grato

Abraços
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB