Kan man på något enkelt sätt lägga ut en bild sida vid sida?

Har en liten Bmp bild som jag vill lägga ut på en Form.Picture så den täcker hela formen men inte sträcka ut den utan sida vid sida.

Någon som har något tips?
Thx.

Hej
I Formens General
Private Declare Function BitBlt Lib "gdi32" _
(ByVal hDestDC As Long, _
ByVal X As Long, ByVal Y As Long, _
ByVal nWidth As Long, ByVal nHeight As Long, _
ByVal hSrcDC As Long, ByVal xSrc As Long, _
ByVal ySrc As Long, ByVal dwRop As Long) As Long

Const COPYIT& = &HCC0020 'tillhör BitBl

'Sätt Formens ScaleMod till pixel
'Sätt Formens ClipControlls till True

Private Sub Form_Paint()
'Ritar upp bakgrunden
Dim wId As Long, hIg As Long
Dim swId As Long, shIg As Long
Dim X As Long, Y As Long
Dim ret As Long
swId = Form1.ScaleWidth
shIg = Form1.ScaleHeight

wId = 32 'här skriver du bildens x y pixel
hIg = 32

For Y = 0 To shIg Step hIg
For X = 0 To swId Step wId
ret = BitBlt(Form1.hDC, X, Y, wId, hIg, _
Form1.hDC, 0, 0, COPYIT&)
Next 'X
Next 'Y
End Sub

/Sven

Coolt, men den ta även med objekt som ligger inom bilden.
Går det att komma förbi?

/Tack!

Hej
Nej det har jag brottats med länge,för att det skall funka
så måste den yta som din Form.Picture ligger på vara fri.
Det här ju bäst fö sk "wallpaper" då kan man lägga ett litet
mönster längst upp till vänster på Formen.
Och "kvickt som en höna skiter" så kopieras denna bild över hela Formen.
Minska ner storleken på din .bmp så att den får en fri yta uppe till vänster.
Kolla Programarkivet:363 som exempel
/Sven

m du sökt i forumet skulle du nog funnit koden.
Jag har tidigare lös dett problem i inlägg: [Kopiering av bild över formen]

Du får svara snabbare om du söker än om någon annan svarar. Tänk på det. ;o)

Hej Andreas
Har nu testat ditt förslag till lösning,det funkade ju Guld.
Visste inte om PatBlt, är den Ny ?

Viktigt ! Glöm inte att sätta Formens ClipControlls till True
om du inte gör det kommer det att spöka kraftigt efter ett tag.

En annan sak när man kör enl din metod så står Hd:en och
går ett 10 tal sek efter exekvering,vad tusan sysslar API:erna med ?
undrar
Sven

Hjälp!

Hur kommer jag till !formu76245 ????????????


Om det varit lättare för nybörjare som mig att söka upp det man söker så hade jag hittat det, för jag brukar gå den vägen sen forumet!

Mycket tacksam för hjälpen!!!

Hej ang Andreas inlägg ovan
>Jag har tidigare lös dett problem i inlägg: !formu76245

[Kopiering av bild över formen] Andreas är en obotlig slarver,det vore bra om han
kollade sina inlägg kritiskt och använde det utmärkta verktyget "ändra"
/Sven

Tack SvenPon!


Tackar och bockar!!!!


ps'
Hur gör man det i en MDIForm?
'ds

MDIForm's backgrund då, går det göra något liknande där?
Den är ju inte samma som en form?

Thx

Hej
Har inte kollat men om den har .hDC propertie så bör det gå.
/Sven

Jag går utbildning för att bli elektriker på dagarna nu. Har typ någon timme på mig när jag kommer hem att läsa igenom dagens alla inlägg och svar.
Är ju då lite lat när det gäller kontroll av inläggen. Svårt att hinna med annars.

Hej
>Jag går utbildning för att bli elektriker på dagarna

Jaha och vad skall du ha för yrke på nätterna ?? :-)

Passupp Göteborgare nu är han på G,snart är stan mörklagd.
"Friskt kopplat hälften brunnit"

/Sven

Anntingen det ellr bli hissmontör.
Få alla hissar i götborg att falla fritt på ett och samma dag.