Redimensionner une fenêtre et son contenu en même temps ???

Question

Bonjour, j'ai un programme VB dans lequel j'ai uen fenêtre avec des objets. 
C'est une appli MDI, fenêtre parent et enfant. 

j'ai la fenêtre parent et en dessous la fenêtre enfant qui est ouverte. 

Ce que je souhaite est que lorsque je redimensionne la fenêtre parent, la fenêtre enfant soit automatiquement redimensionnée. Ce qui veux dire que tout est redimensionné. 

J'ajoute quelque propriétés de la fenêtre enfant : 
AutiRedraw = True 
BorderStyle = None (de cette façon la fenêtre est directement ouverte en plein écran et je n'ai pas de barre en haut 

Voilà ce n'est pas très simple à expliquer, j'espère que vous avez compris 

MErci d'avance

yoyo269 · Answer

Salut,

Peut-être en te servant de l'événement Form_Load().
En espérant que j'ai bien compris ce que tu voulais dire.

YOYO, @+.

 :big)  YOYO  ;)

yoyo269 · Answer

Pardon je voulais dire Form_Resize().

 :big)  YOYO  ;)

Minikisscool · Answer

Form_Resize()
oui, je ne connaissais pas, mais je mets quoi dendans.
je dis que si la MDI parent est redimensionnée, la MDI child et son contenu également ?

MErci

yoyo269 · Answer

Après t'as juste à te servir des propriétés de dimension de tous les objets que tu souhaites redimensionner.
C'est-à-dire Top, Left, Height et Width.
C'est tout.

YOYO, @+.
 :big)  YOYO  ;)

CCJ · Answer

peut etre qu'on tas deja repondu correctement(mais j'ai pas vu "reponse accepte" ) mais pour ca il faut que tu fasse un truc dans le genre :
dim h as string
fim w as string

private sub form_load()
h = form1.height
w = form1.width
end sub

private sub form_reseize()
if form1.height > h then
h = form1.height - h
mamdi.height = mamdi.height + h
h = form1.height
else
h = form1.height + h
mamdi.height = mamdi.height - h
h = form1.height
end if

if form1.widht > w then
w = form1.widht - w
mamdi.width = mamdi.width + w
w = form1.width
else
w = form1.widht + w
mamdi.width = mamdi.width - w
w = form1.width
end if

end sub 

voila 
VirusMan :-p 
 :shock) une idée est un chose ,la dire en est une autre :shock)

CCJ · Answer

ha execuse moi c'est pas "fim w as string" mais "dim w as string"
VirusMan :-p 
 :shock) une idée est un chose ,la dire en est une autre :shock)

soldier8514 · Answer

[tutoriaux/VISUAL-BASIC-GENERAL-COMMENT-REDIMENSIONNER-TABLEAU-VB_3.aspx la soluce est ici ]




http://www.vbfrance.com/codes/3NITY-IMAGE-STUDIO-ACTIVEX-SDK-COMPOSANT-DEDIE-IMAGERIE_41922.aspx

Redimensionner une fenêtre et son contenu en même temps ???

7 réponses

Discussions similaires