Ir para conteúdo
Fórum Script Brasil
  • 0

Converter Bmp Para Icon ?


escobar

Pergunta

au alimento um LABEL... com dois digitos, dai eu crio um BMP do label fica bom, mas agora preciso transformar este BMP em ICON... será que alguém pode me ajudar ? huh.gif

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

  • 0

Essa converte Bmp para Jpeg, testa ai e ve se converte para ICON, é só mudar alguns comandos... tipo alterar de jpeg para icon.

cara tente dessa forma:

Function BmpToJpeg(cImage: String):Boolean;

var

MyJPEG : TJPEGImage;

MyBMP : TBitmap;

begin

Result := False;

if fileExists(cImage+'.bmp') then

begin

MyBMP := TBitmap.Create;

with MyBMP do

begin

try

LoadFromFile(cImage+'.bmp');

MyJPEG := TJPEGImage.Create;

with MyJPEG do

begin

Assign(MyBMP);

SaveToFile(cImage+'.jpeg');

Free;

Result := True;

end;

finally

Free;

end;

end;

end;

end;

Obs : não testei ainda

falou

Alexandre

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...