Fórum Transformação bmp-jpg, jpg-bmp #187125
08/10/2003
0
CAROS AMIGOS
PRECISO TRANSFORMAR UMA IMAGEM BMP EM JPG, MAS TB O
PROCESSO CONTRARIO, NAO SEI SE É POSSIVEL, PELO DELPHI
SE PUDEREM DAR UMA DICA.
SOLDI
[b:69133fe175]Título em letras maiúsculas editado, conforme citado nas regras de conduta. Evite-as também no corpo da mensagem. Equivale a gritar.[/b:69133fe175]
PRECISO TRANSFORMAR UMA IMAGEM BMP EM JPG, MAS TB O
PROCESSO CONTRARIO, NAO SEI SE É POSSIVEL, PELO DELPHI
SE PUDEREM DAR UMA DICA.
SOLDI
[b:69133fe175]Título em letras maiúsculas editado, conforme citado nas regras de conduta. Evite-as também no corpo da mensagem. Equivale a gritar.[/b:69133fe175]
Soldi
Curtir tópico
+ 0
Responder
Posts
08/10/2003
Beppe
Coloque Jpeg num [b:f4bd00566f]uses[/b:f4bd00566f]. Então:
function BmpParaJpg(Bmp: TBitmap): TGraphic;
begin
Result := TJpegImage.Create;
Result.Assign(Bmp);
end;
function JpgParaBmp(Jpg: TJpegImage): TGraphic;
begin
Result := TBitmap.Create;
Result.Assign(Jpg);
end;
Ataliba.
function BmpParaJpg(Bmp: TBitmap): TGraphic;
begin
Result := TJpegImage.Create;
Result.Assign(Bmp);
end;
function JpgParaBmp(Jpg: TJpegImage): TGraphic;
begin
Result := TBitmap.Create;
Result.Assign(Jpg);
end;
Ataliba.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)