Image.picture

[Claudio Neto 3]

Tem como eu alterar o valor da propriedade image.picture.width?

 

O que eu preciso fazer é um controle onde possa regular o tamanho de uma imagem dentro de um objeto Image.

 

Alguém sabe algo sobre isso?

[scorpio 7]

O Image tem uma propriedade chamada stretch, acho que vai servir pra você.

Essa propriedade é assim...

valor False - se você tem uma imagem de 100 pixels, e estica ou encolhe o objeto a imagem continua normal

valor True - se você tem uma imagem de 100 pixels, e estica ou encolhe o objeto, a imagem estica/encolhe junto.

 

Acho que essa propriedade que você passou é ReadOnly, por que se você ta usando o Stretch como False, o Image pode ter 10 pixels mas a imagem 100, dai , usando ela você captura o tamanho da imagem.

Não sei se deu pra você entender direito, qualquer coisa volta ae!

[Claudio Neto 3]

Eu entendi. Conheço isso, mas não é o que preciso.

 

O que precisava mesmo era ir ajustando a altura e a largura independentes uma da outra pouco a pouco.

 

Tem alguns sites que fazem isso. Você coloca sua imagem, ela fica deslocada, ai você vai aumentando ou diminuindo e locomovendo-a até que fique de uma forma que se encaixe perfeitamente no quadrado.

 

To achando que é meio impossível isso. O mais perto que consegui foi deixar dois imagens, um grande de fundo e um menos na frente. Ai vou ajustando o maior com o menor de referência.

 

Mas mesmo depois que chego na posição ideal, não tenho idéia de como passar de um image para outro apenas a parte "selecionada".

 

Acho que terei que desistir.. uhauhahu

[scorpio 7]

Hnm.... acho que entendi o que você quer....

 

Uma imagem de um cachoro (ele inteiro, corpo, cabeça) e você quer só salvar a cabeça?

bom se for isso você pode faze umas macumbinhas http://forum.imasters.com.br/public/style_emoticons/default/grin.gif usando a API GetPixel(retorna a cor de um pixel).

Declare Function GetPixel Lib "gdi32" Alias "GetPixel" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long) As Long

Acho que seria melhor você colocar um Image dentro de um Picture, dai você carrega a imagem no picture, e posiciona o Image como quer.

Quando tiver posicionado você começa a pintar ponto por ponto em um outro Image ou Picture.

 

Pra pintar em outro seria isso:

Picture1.PSet (X, Y), vbGreen

O vbGreen você substitui pela cor que retornou o GetPixel.

 

 

Flw