Atualizar TImage
TENHO A SEGUINTE LINHA DE CODIGO: For y := 0 to Lista.Count - 1 do
Begin
Caminho := Edit1.Text + Lista[y];
Image1.Picture.Bitmap.Assign(nil);
Image1.Picture.LoadFromFile( caminho );
image1.Repaint;
end;
ODE LISTA É UMA VARIAVEL TSTRINGLIST QUE ARMAZENA OS NOMES DOS ARQUIVOS JPG E CAMINO É O DIRETORIO DA IMAGEM..
O PROBLEMA É QUE EU ESTOU USANDO O ONTIMER DO TIMER E NAO ESTA ATUALIZANDO A IMAGEM NA TELA!!
COMO POSSO RESOLVER?
[b:c888179f95]Título editado: ´ATUALIZAR TIMAGE - URGENTE´[/b:c888179f95]
Por favor, leia as cláusulas [url=http://forum.clubedelphi.net/viewtopic.php?p=17019#1c]1c[/url] e [url=http://forum.clubedelphi.net/viewtopic.php?p=170191e]1e[/url] das Regras de Conduta.
Sandra/Moderação
Begin
Caminho := Edit1.Text + Lista[y];
Image1.Picture.Bitmap.Assign(nil);
Image1.Picture.LoadFromFile( caminho );
image1.Repaint;
end;
ODE LISTA É UMA VARIAVEL TSTRINGLIST QUE ARMAZENA OS NOMES DOS ARQUIVOS JPG E CAMINO É O DIRETORIO DA IMAGEM..
O PROBLEMA É QUE EU ESTOU USANDO O ONTIMER DO TIMER E NAO ESTA ATUALIZANDO A IMAGEM NA TELA!!
COMO POSSO RESOLVER?
[b:c888179f95]Título editado: ´ATUALIZAR TIMAGE - URGENTE´[/b:c888179f95]
Por favor, leia as cláusulas [url=http://forum.clubedelphi.net/viewtopic.php?p=17019#1c]1c[/url] e [url=http://forum.clubedelphi.net/viewtopic.php?p=170191e]1e[/url] das Regras de Conduta.
Sandra/Moderação
Ronaldo Martins
Curtidas 0
Respostas
Edilcimar
18/04/2005
onde está o comando de parada do ontimer quando carrega a imagem e onde está o comando que recomeça o ontimer após a imagem carregada?
GOSTEI 0
Massuda
18/04/2005
Além do que o edilcimar escreveu, tem um problema com relação ao nome do arquivo e caminho. Ao invés de fazer isso...Assumindo que Edit1.Text contenha algo do tipo c:\imagens e lista[y] seja algo do tipo imagem.bmp. Do jeito que está, caminho irá conter c:\imagensimagem.bmp, o que resulta em arquivo não encontrado.
Caminho := Edit1.Text + Lista[y];
...é melhor fazer...uses SysUtils, ... Caminho := IncludeTrailingBackSlash(Edit1.Text) + Lista[y];
GOSTEI 0