bonjour,
j'ai 2 questions a vous poser.
-j'aimerais savoir comment faire pour figer une form, c'est à dire bloquer toute manipulation dessus mais tout en restant visible.
-au lancement d'une form ,elle se lance en plein ecran.
merci
bonjour,
j'ai 2 questions a vous poser.
-j'aimerais savoir comment faire pour figer une form, c'est à dire bloquer toute manipulation dessus mais tout en restant visible.
-au lancement d'une form ,elle se lance en plein ecran.
merci
Il y'a une solution un peut 'bourine' qui consiste a prendre un screen shoot de ta fenêtre et de l'afficher dans un TImage qui prend toute la surface... ça fonctionne. Si non, plus hard, il faut reprogrammer le gestionnaire de message pour tous les manger (en tout cas la souris et le clavierEnvoyé par aaronw
)
a mon avis la reponse est proche de laEnvoyé par aaronw
voir prés des toutoriel
, ou simplement accésible en faisant
![]()
1° si tu lui interdis le focus, ça le fait pê simplement
Une solution radicale est d'intercepter le message WM_NCHITTEST
en procédant de la façon suivante:
En espérant répondre à ta question.
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 ... type TForm1 = class(TForm) Button1: TButton; procedure FormCreate(Sender: TObject); procedure Button1Click(Sender: TObject); private { Déclarations privées } procedure WMNCHITTEST(var Message: TWMWindowPosMsg); message WM_NCHITTEST; public { Déclarations publiques } end; var Form1: TForm1; implementation {$R *.DFM} procedure TForm1.WMNCHITTEST(var Message: TWMWindowPosMsg); begin // end; procedure TForm1.FormCreate(Sender: TObject); begin WindowState := wsMaximized; //lancer en plein écran end; procedure TForm1.Button1Click(Sender: TObject); begin close; //te permet quand même de refermer la fenêtre end; ...
Cordialement
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager