Você está aqui: Delphi ::: Imagens, Gráficos e Cores ::: TBitmap (A classe TBitmap) |
Como retornar a largura de uma imagem carregada no TBitmap do Delphi usando a propriedade WidthQuantidade de visualizações: 1037 vezes |
Em algumas situações situações nós queremos saber a largura em pixels de uma imagem carregada em um objeto TBitmap da linguagem Delphi. Para isso nós podemos usar sua propriedade Width. Veja um trecho de código Delphi no qual carregamos uma imagem JPG em um TJpegImage para carregar uma imagem JPEG. Em seguida nós transferimos essa imagem para um bitmap e o desenhamos na superfície do formulário. Note a chamada à propriedade Width da classe TBitmap para retornar a largura da imagem como um Integer (representando a largura em pixels): // não se esqueça de adicionar 'JPEG' no uses procedure TForm4.Button1Click(Sender: TObject); var jpg: TJpegImage; bmp: TBitmap; begin // vamos criar um novo objeto TJpegImage jpg := TJpegImage.Create; // agora vamos carregar a imagem JPG desejada jpg.LoadFromFile('C:\estudos_java\lago.jpg'); // agora criamos o bitmap bmp := TBitmap.Create; // e atribuimos o JPG ao Bitmap bmp.Assign(jpg); // finalmente desenhamos o bitmap no form Ao executar este código Delphi nós teremos um resultado parecido com: A largura da imagem é: 400 pixels. |
![]() |
Desafios, Exercícios e Algoritmos Resolvidos de Delphi |
Veja mais Dicas e truques de Delphi |
Dicas e truques de outras linguagens |
E-Books em PDF |
||||
|
||||
|
||||
Linguagens Mais Populares |
||||
1º lugar: Java |