Fórum Duvida no Timage #321663

18/05/2006

0

Olá amigos...


Primeiramente tenho um banco sqlserver . Na tabela de alunos tenho imagens Bmp e Jpg. so que o meu (Timage) so carrega as imagens JPG! Gostaria de saber como faço para ele carregar tanto o bmp como o jpg?

Desde de já obg pela atenção de todos aki no Forum ClubDelphi.


Alexespina

Alexespina

Responder

Posts

18/05/2006

Adriano Santos

Cara, vc pode fazer uma verificação mais ou menos assim:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if OpenDialog1.Execute then
  begin
    if ExtractFileExt(FileName) = ´.jpg´ then
      Image1.Picture.LoadFromFile(FileName)
    else if ExtractFileExt(FileName) = ´.bmp´ then
      Image1.Picture.Bitmap.LoadFromFile(FileName);
    else 
      ShowMessage(´Tipo inválido´);
  end;
end;



Responder

Gostei + 0

19/05/2006

Alexespina

veleu pela dica deu certo!
muito boa!


:D


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar