Discussion :

[yvanovitch]

Bonjour à tous,
J'ai un problème d'affichage dont je voudrais bien connaitre l'origine, voici le problème:
-Je veux mettre une image bmp en fond de manière a créer un scroll horizontal ( avec directdraw et bltfast).
J'ai donc confectionné mon image BMP avec paint ( largeur 5000 pixels , hauteur 800 pixels).
PROBLEME: Si la largeur de l'image dépasse 4000 pixels , l'affichage avec BLTFAST est déformé , ma résolution d'écran est de 1280 pixels en largeur????.
J'ai essayé de réduire la hauteur tout en maintenant la largeur à 5000 pixels , idem ( déformé).
Quelqu'un peut il m'expliqué ce phénomène.
Merci à tout ceux qui voudront bien se pencher sur ce problème.
Salutations à tous

[yvanovitch]

Je rajoute une précision , il est bien entendu que je n'affiche qu'une partie de l'image correspondante à la largeur de mon écran puis je décale les coordonnées pour faire scroller l'image entière

[ProgElecT]

Rien a voir avec DIRECTX7, mais la gestion du HScroll et du VScroll devrait t'interesser.
Sur un Form, un PictureBox, un HScroll et un VScroll

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
Option Explicit
 
Private Sub Form_Load()
Me.ScaleMode = vbPixels
Picture1.ZOrder (1)
Picture1.ScaleMode = vbPixels
Picture1.AutoSize = True
'adapter, image de 4556 pixels de large par 1321 pixels de haut
Picture1.Picture = LoadPicture("C:\PersoFrancis\Montage.jpg")
Picture1.Move 22, 22
HScroll1.Move 22, 4, Me.ScaleWidth - 40, 17
VScroll1.Move 4, 22, 17, Me.ScaleHeight - 40
End Sub
Private Sub Form_Activate()
HScroll1.Value = HScroll1.Max
VScroll1.Value = VScroll1.Max
End Sub
Private Sub Form_Resize()
If Me.WindowState <> vbMinimized Then
 HScroll1.Move 22, 4, Me.ScaleWidth - 40, 17
 HScroll1.Max = Picture1.ScaleWidth + (VScroll1.Left + VScroll1.Width)
 HScroll1.Min = Me.ScaleWidth - (VScroll1.Left + VScroll1.Width)
 VScroll1.Move 4, 22, 17, Me.ScaleHeight - 40
 VScroll1.Max = Picture1.ScaleHeight + (HScroll1.Top + HScroll1.Height)
 VScroll1.Min = Me.ScaleHeight - (HScroll1.Top + HScroll1.Height)
End If
End Sub
 
Private Sub HScroll1_Change()
Picture1.Left = (HScroll1.Value - Picture1.ScaleWidth)
End Sub
Private Sub HScroll1_Scroll()
HScroll1_Change
End Sub
Private Sub VScroll1_Change()
Picture1.Top = (VScroll1.Value - Picture1.ScaleHeight)
End Sub
Private Sub VScroll1_Scroll()
VScroll1_Change
End Sub

[ucfoutu]

Bonsoir,

J'attendais une réaction et je félicite Progelect de la sienne.

Seul hic : yvanovicth souhaite une image de fond pour une form (ce qui n'est pas possible) de dimensions supérieures aux maximaux....

Alors et pour yvanovitch : abandonne l'idée d'une image de fond sur la form et adopte la picturebox (qui elle peut être plus grande) comme te l'indique Progelect, que je salue.

[yvanovitch]

Messieurs ,
Je me suis peut etre mal exprimé mais il s'agit bien de DIRECTX donc de BLTFAST et non de pictureBox.
L'image en mémoire à mon avis , pouvait etre plus grande que l'écran , ce qui est le cas puisque je peux afficher des portions d'une image de 4000 pixels maximum de largeur mais ma question, pourquoi cette limite de 4000 pixels.
Le scroll droite et gauche fonctionne parfaitement avec cette méthode ( BLTFAST) à condition que la largeur de l'image en mémoire ne dépasse pas les 4000 pixels??????.
A suivre si quelqu'un sait , moi je nages!!!!
Merci

[ProgElecT]

Salutation yvanovitch
Mon propos n’était pas de te donner la solution avec l’utilisation de DIRECTX7, étant trop ignorant avec cet outil.
Au boulot j’ai un programme qui traite des images de 6200 pixels par 5600, sachant les manipuler, effet zoom positif et négatif, sélection partiel pour du copier/coller ….., la proposition voulait démontrer qu’il est possible de contourner le problème par l’utilisation d’un PictureBox.
Je suppose que l’outil DIRECTX7 BLTFAST a ces limites.
En VB6 le Form a les siennes, le PictureBox aussi, mais aussi la capacité mémoire installée, car le programme construit au boulot plante sur mon PC personnel.
Peut être te serait il possible de faire un essai avec DIRECTX7 dans un PictureBox ?
A+