dimension ecran et form

**blondelle** · 06/05/2006, 22h28

un debut de mon application tire des renseignements de la FAQ ce que j'ai reussi a faire d'apres les renseignements recueillis et mes propres recherches
il faut une forme et un bouton
dans form.cpp

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
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
 
 
#include <vcl.h>
#pragma hdrstop
#include "save_resol.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
        // on rend invisible la barre de tache
HWND wd = FindWindow("Shell_TrayWnd", NULL);
ShowWindow(wd, 0);
        // acquisition resolution
Width = Screen->Width;
Height = Screen->Height;
        // on sauve la resolution
save_reso_width = Width;
save_reso_height = Height;
        // on teste la resolution
        // si elle est differente de 800*600
        // alors on change la resolution
if(Width != 800 && Height != 600)
{
TDeviceMode *Dev = new TDeviceMode;
EnumDisplaySettings(0, ENUM_CURRENT_SETTINGS, Dev);
Dev->dmPelsWidth = 800;
Dev->dmPelsHeight = 600;
Dev->dmFields = DM_PELSWIDTH | DM_PELSHEIGHT;
bool result = (ChangeDisplaySettings(Dev, CDS_RESET) == DISP_CHANGE_SUCCESSFUL);
delete Dev;
        // result n'est pas utilise pour l'instant
        //return result;
}
// on positionne la forme en haut a gauche
HWND hwnd = GetForegroundWindow();
        //MoveWindow(hwnd, 0, 0, 800, 600, 1);
SetWindowPos(hwnd, HWND_TOP, 0, 0, 800, 600, SWP_DRAWFRAME);
        // on efface la barre de titre ainsi que
        // minimise, resize, et croix fermeture
        // la barre de titre doit etre effacee apres le
        // positionnement sinon la fonction SetWindowPos
        // est sans effet quand au positionnement en
        // haut a gauche
Form1->BorderStyle = bsNone;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
        // on teste la resolution
        // si elle est differente de la sauvegarde
        // alors on change la resolution
Width = Screen->Width;
Height = Screen->Height;
if(Width != save_reso_width && Height != save_reso_height)
{
TDeviceMode *Dev = new TDeviceMode;
EnumDisplaySettings(0, ENUM_CURRENT_SETTINGS, Dev);
Dev->dmPelsWidth = save_reso_width;
Dev->dmPelsHeight = save_reso_height;
Dev->dmFields = DM_PELSWIDTH | DM_PELSHEIGHT;
bool result = (ChangeDisplaySettings(Dev, CDS_RESET) == DISP_CHANGE_SUCCESSFUL);
delete Dev;
        // result n'est pas utilise pour l'instant
        //return result;
}
        // on rend visible la barre de tache
HWND wd = FindWindow("Shell_TrayWnd", NULL);
ShowWindow(wd, 8);
        // on termine le programme
Application->Terminate();
}

dans form.h

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
 
 
#ifndef save_resolH
#define save_resolH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: // IDE-managed Components
        TButton *Button1;
        void __fastcall Button1Click(TObject *Sender);
private: // User declarations
public:  // User declarations
int save_reso_width;
int save_reso_height;
        __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

je remercie tous les intervenants c'est grace a eux si je progresse

**bandit boy** · 07/05/2006, 19h05

Tu poses ton code à titre informatif, ou tu as une question?

Si c'est juste pour info, tu peux demander à faire parti des groupes de discussions. Sinon, j n'ai pas vu ta question, désolé

**blondelle** · 07/05/2006, 20h26

le code fonctionne chez moi sur XP pro pack1 il est donne a titre d'information mais peut etre ameliore si besoin est le but du forum est de partager et c'est ce que je fais.

**bandit boy** · 08/05/2006, 11h58

D'accord, mais pourquoi rend tu invisible la barre des tâches?
Cette opération la rend juste invisible, mais elle ne libère pas l'espace en bas de l'écran. Pour cela, il faut modifier le paramètre d'affichage de la barre.

**blondelle** · 08/05/2006, 13h16

je rend la barre de tache invisible pour qu'une mauvaise manip ne soit pas faite le programme que je projette, je doit gerer un telescope donc etre utilise la nuit, je vais commander des moteurs pas a pas et, ceux ci ne peuvent rester sous tension sans tourner (c'est le programme qui les commandes).
Je m'etais apercu que toute la surface de l'ecran n'etait pas liberee ma forme ne fait pas tout a fait 800*600 je pensais que cela etait normal pour recuperer cet espace quelle commande utiliser S.V.P.

**Neilos** · 08/05/2006, 14h36

Envoyé par blondelle

je rend la barre de tache invisible pour qu'une mauvaise manip ne soit pas faite le programme que je projette, je doit gerer un telescope donc etre utilise la nuit, je vais commander des moteurs pas a pas et, ceux ci ne peuvent rester sous tension sans tourner (c'est le programme qui les commandes).
Je m'etais apercu que toute la surface de l'ecran n'etait pas liberee ma forme ne fait pas tout a fait 800*600 je pensais que cela etait normal pour recuperer cet espace quelle commande utiliser S.V.P.

Pourrais tu être plus précise et t'exprimer un peu mieux s'il te plaît ?
Je ne comprend pas bien ce que tu demandes...

**blondelle** · 08/05/2006, 14h46

comment recuperer l'espace laisse par la barre de tache

**Neilos** · 08/05/2006, 15h10

Ajuster les propriétés Width et Height de ta fiche à respectivement Screen->Width et Screen->Height ne le fait pas ?

**blondelle** · 08/05/2006, 15h19

reponse a neilos
ma forme se redimensionne systematiquement en 790*524

**Neilos** · 08/05/2006, 15h21

Ta form est maximisée ou qqc ?
Si tu la redimensionne à la main (avec la souris) durant l'exécution tu peux l'aggrandir en débordant sur la zone où il y avait la bare des tâches non ?

**blondelle** · 08/05/2006, 15h23

reponse a neilos
le fait d'avoir supprime la barre de titre ne me donne plus la main sur la forme

**Neilos** · 08/05/2006, 18h04

Eh bien pour les tests tu remet la barre de titre :p

**blondelle** · 08/05/2006, 18h33

reponse a neilos
la barre de titre remise aucun changements l'ecran est occupe completement mais la dimension de la forme est toujours de 790*524, par contre la place liberee quand on rend la barre de titre invisible n'est pas recuperee , on ne recupere pas non plus la place de la barre de tache quand on la rend invisible

**Neilos** · 08/05/2006, 18h49

Et tu as essayé comme je t'ai dit en agrandissant la taille via le curseur de la souris ?

**blondelle** · 08/05/2006, 19h17

reponse a neilos
oui mais je n'ai pas la main sur la forme

**Neilos** · 08/05/2006, 19h45

Tu appelles quoi ne pas avoir la main ?

**blondelle** · 08/05/2006, 19h52

reponse a neilos
la souris ne peut pas redimensionner la forme

Oui d'accord mais c'est TOI qui développe cette application...donc tu peux faire en sorte que ta fenêtre puisse à nouveau être redimensionnée par la souris pour faire le test et ensuite le désactiver à nouveau....non ?

**bandit boy** · 08/05/2006, 19h59

Salut,
Pour Neilos, je ne comprend pas ta modification:

Dernière modification par Neilos Aujourd'hui à 19h50. Motif: Evite de poster deux fois de suite, utilise plutôt le bouton Editer à la place. Merci !

Vu que ce que tu as ajouté à ma conversasion ne viens pas de moi !

Pour Blondelle, voici un code que j'ai fais qui teste l'état de la barre de tâche, si tu veux la modifier, je te donnerais la fonction plus tard

Code :

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

1
2
3
4
 
if((UINT) SHAppBarMessage(ABM_GETSTATE, &TaskBar) == ABS_ALWAYSONTOP)
{\\traitement
}

et je l'ajouterai en modifiant mon post (ne t'inquiète pas Neilos)

**Neilos** · 08/05/2006, 20h21

Envoyé par bandit boy

Salut,
Pour Neilos, je ne comprend pas ta modification:

Vu que ce que tu as ajouté à ma conversasion ne viens pas de moi !
et je l'ajouterai en modifiant mon post (ne t'inquiète pas Neilos)

Erf gros plop. Je ne comprend vraiment pas comment ça c'est fusionné...mauvaise manipulation probablement mais je ne m'en suis pas rendu compte.
Toutes mes excuses

**bandit boy** · 08/05/2006, 20h47

Y'a pas de soucis Neilos.
Du coup je profite de ce post pour donner une fonction qui devrait modifier l'état de la barre des tâches

Code :

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

1
2
3
4
5
 
if((UINT) SHAppBarMessage(ABM_SETSTATE, &TaskBar) = ABS_ALWAYSONTOP)
{
   Application->MessageBox("Erreur de changement de propriété","Erreur",MB_OK);
}

à tester, je n'ai pas builder sur ce poste. Sinon, je confirmerais surement demain matin.

dimension ecran et form

C++Builder

Discussions similaires

Partager

Partager