IMAGEM DE FUNDO

RAMON 13/09/2006 21:26:44
#171297
Como eu faço para colocar uma imagem de fundo no form sendo que minha imagem é 100x100 e meu form é de 800x600?

Tem como fazer ou terei que criar uma imagem de fundo do tamanaho do form?
MARCOSAV 13/09/2006 23:24:05
#171313 Resposta escolhida
VC deve colocar um controle image no form e definir assim

Private Sub Form_Load()
Image1.Width = Me.Width
Image1.Height = Me.Height
End Sub


Se for pela propriedade Picture do Form, acho que vc vai ter que fazer na unha mesmo....

Ah, no Image deixe Stretch = True
Apenas cuidado com as distorsões da imagem

Abraço
T+
MARCOSAV 13/09/2006 23:28:51
#171314
Só prá completar,

vc não consegue redimensionar a imagem com a propriedade Picture do form..
Quando eu digo fazer na unha, é pegar uma imagem que já seja do tamanho que vc quer, vlw ???

T+
RAMON 13/09/2006 23:35:52
#171315
Nao tem como colocar lado a lado a imagem pois do jeito acima a imagem vai distorcer
MARCOSAV 13/09/2006 23:56:34
#171319
E eu disse que não...... (ddhhhhhhhhhhhhh)
Perae, que tem sim [S55]
Coloque um controle Image no form e copie este código...

Option Explicit

Private Sub Form_Paint()

    Dim X As Integer, Y As Integer
    Dim ImgWidth As Integer
    Dim ImgHeight As Integer
    Dim FrmWidth As Integer
    Dim FrmHeight As Integer

    ImgWidth = Image1.Width
    ImgHeight = Image1.Height
    FrmWidth = Form1.Width
    FrmHeight = Form1.Height
    
    For X = 0 To FrmWidth Step ImgWidth
       For Y = 0 To FrmHeight Step ImgHeight
          PaintPicture Image1, X, Y
       Next Y
    Next X
End Sub


T+
RAMON 14/09/2006 19:49:22
#171555
ok

valeu!
Tópico encerrado , respostas não são mais permitidas
Voltar