Problemas ao usar Image1.Picture.LoadFromFile

Delphi

06/04/2003

Caros colegas,

Image1.Picture.LoadFromFile(´C:\Meus Documentos\Tema\Contas.Jpg´);

Gostaria de substituir o caminho especificado acima por uma váriavel que contivesse o referido caminho, então procedi assim:

procedure TFormContas.FormShow(Sender: TObject);
Const caminho: String = ´C:\Meus Documentos\Tema\Contas.Jpg´;
begin
inherited;
Image1.Picture.LoadFromFile(caminho);
end;

Daí ocorre um erro EAcess Violation with message ´Acess Violation at adress 004E484E...´.
O programa trava e tenho de reiniciar o computador, e mesmo voltando como estava antes o erro persiste, e tenho que substituir os arquivos .PAS e .DFM pelo backup para voltar a funcionar.

Alguém pode me explicar porque isso ocorre e como deverei proceder.

Obs.: Já tentei usar Var ao invés de Const, mas deu o mesmo problema.

Obrigado,

Marcello.


Marcello

Marcello

Curtidas 0

Respostas

Anonymous

Anonymous

06/04/2003

oi, td bem?
pelo que vi o seu codigo esta correto, so achei uma coisa que pode estar errada, na declaracao da constante deve ser
CONST CAMINHO = ´C:\...´ e não CONST CAMINHO : STRING = ´...´
tomara que tenha ajudado, valeu


GOSTEI 0
Anonymous

Anonymous

06/04/2003

Coloque JPEG na clausula Uses


GOSTEI 0
POSTAR