Imagem dá extensão .png desconhecida
Olá pessoal, estou com a seguinte dúvida.....preciso carregar uma imagem com o endereço fixo e mudando apenas o código referente a imagem. quando vai carregar dá que a extensão é desconhecida.o que eu estou errando amigos???? abaixo segue o código:
procedure TForm_Dvds.FormShow(Sender: TObject);
var
file_name : string;
begin
file_name := '192.168.0.4\htdocs\CIG\Imgs\Capas_DVDs\DVD_' + InttoStr(DM.ADOQuery_DVDsCod_DVD.Value) + '.png';
//OpenPictureDialog_Dvd.FileName := file_name;
Image5.Picture.LoadFromFile(file_name);
end;
procedure TForm_Dvds.FormShow(Sender: TObject);
var
file_name : string;
begin
file_name := '192.168.0.4\htdocs\CIG\Imgs\Capas_DVDs\DVD_' + InttoStr(DM.ADOQuery_DVDsCod_DVD.Value) + '.png';
//OpenPictureDialog_Dvd.FileName := file_name;
Image5.Picture.LoadFromFile(file_name);
end;
Fabricio Luciano
Curtidas 0
Respostas
Rafael Brendolan
08/10/2013
Está faltando duas "\"
file_name := '\\192.168.0.4\htdocs\CIG\Imgs\Capas_DVDs\DVD_' + InttoStr(DM.ADOQuery_DVDsCod_DVD.Value) + '.png';
file_name := '\\192.168.0.4\htdocs\CIG\Imgs\Capas_DVDs\DVD_' + InttoStr(DM.ADOQuery_DVDsCod_DVD.Value) + '.png';
GOSTEI 0
Fabricio Luciano
08/10/2013
Obrigado....resolvido.
GOSTEI 0