Bonjour a tous, je voudrais ameliorer ma base de maniere à ce qu'au
demarrage elle s'ouvre selon la resolution de mon ecran, j'avais il y a un
an obtenu de "Drizzit" la procedure ci-dessous, mais malheureusement ça
marche pas, j'ai un message qui me dis: " type d'argument Byref
incompatible"
' resolution de l'ecran
'Type rect
' X1 As Long
' Y1 As Long
' X2 As Long
' Y2 As Long
'End Type
'Declare Function getdesktopwindow Lib "user32" () As Long
'Declare Function getwindowrect Lib "user32" (ByVal hwnd As Long, rectangle
As rect) As Long
'Function getscreenresolution() As String
' hwnd = getdesktopwindow()
' retvai = getwindowrect(hwnd, R)
' getscreenresolution = (R.X2 - R.X1) & "x" & (R.Y2 - R.Y1)
'End Function
Ou est l'erreur, comment faire fonctionner cette procedure ?
Merci
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Eric
Bonjour,
Function GetScreenResolution() As String Dim R As rect ' <---- manquait cette déclaration hwnd = GetDesktopWindow() RetVal = GetWindowRect(hwnd, R) GetScreenResolution = (R.X2 - R.X1) & "x" & (R.Y2 - R.Y1) End Function
Bonjour a tous, je voudrais ameliorer ma base de maniere à ce qu'au demarrage elle s'ouvre selon la resolution de mon ecran, j'avais il y a un an obtenu de "Drizzit" la procedure ci-dessous, mais malheureusement ça marche pas, j'ai un message qui me dis: " type d'argument Byref incompatible"
' resolution de l'ecran 'Type rect ' X1 As Long ' Y1 As Long ' X2 As Long ' Y2 As Long 'End Type 'Declare Function getdesktopwindow Lib "user32" () As Long 'Declare Function getwindowrect Lib "user32" (ByVal hwnd As Long, rectangle As rect) As Long 'Function getscreenresolution() As String ' hwnd = getdesktopwindow() ' retvai = getwindowrect(hwnd, R) ' getscreenresolution = (R.X2 - R.X1) & "x" & (R.Y2 - R.Y1) 'End Function Ou est l'erreur, comment faire fonctionner cette procedure ? Merci
Function GetScreenResolution() As String
Dim R As rect ' <---- manquait cette déclaration
hwnd = GetDesktopWindow()
RetVal = GetWindowRect(hwnd, R)
GetScreenResolution = (R.X2 - R.X1) & "x" & (R.Y2 - R.Y1)
End Function
Bonjour a tous, je voudrais ameliorer ma base de maniere à ce qu'au
demarrage elle s'ouvre selon la resolution de mon ecran, j'avais il y a un
an obtenu de "Drizzit" la procedure ci-dessous, mais malheureusement ça
marche pas, j'ai un message qui me dis: " type d'argument Byref
incompatible"
' resolution de l'ecran
'Type rect
' X1 As Long
' Y1 As Long
' X2 As Long
' Y2 As Long
'End Type
'Declare Function getdesktopwindow Lib "user32" () As Long
'Declare Function getwindowrect Lib "user32" (ByVal hwnd As Long, rectangle
As rect) As Long
'Function getscreenresolution() As String
' hwnd = getdesktopwindow()
' retvai = getwindowrect(hwnd, R)
' getscreenresolution = (R.X2 - R.X1) & "x" & (R.Y2 - R.Y1)
'End Function
Ou est l'erreur, comment faire fonctionner cette procedure ?
Merci
--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Function GetScreenResolution() As String Dim R As rect ' <---- manquait cette déclaration hwnd = GetDesktopWindow() RetVal = GetWindowRect(hwnd, R) GetScreenResolution = (R.X2 - R.X1) & "x" & (R.Y2 - R.Y1) End Function
Bonjour a tous, je voudrais ameliorer ma base de maniere à ce qu'au demarrage elle s'ouvre selon la resolution de mon ecran, j'avais il y a un an obtenu de "Drizzit" la procedure ci-dessous, mais malheureusement ça marche pas, j'ai un message qui me dis: " type d'argument Byref incompatible"
' resolution de l'ecran 'Type rect ' X1 As Long ' Y1 As Long ' X2 As Long ' Y2 As Long 'End Type 'Declare Function getdesktopwindow Lib "user32" () As Long 'Declare Function getwindowrect Lib "user32" (ByVal hwnd As Long, rectangle As rect) As Long 'Function getscreenresolution() As String ' hwnd = getdesktopwindow() ' retvai = getwindowrect(hwnd, R) ' getscreenresolution = (R.X2 - R.X1) & "x" & (R.Y2 - R.Y1) 'End Function Ou est l'erreur, comment faire fonctionner cette procedure ? Merci
bonjour eric, il n'y a plus de message d'erreur, mais au lancement de la base, il ne tiens pas compte de la resolution de l'ecran. Enfin ça fait rien, merci quand même
Function GetScreenResolution() As String Dim R As rect ' <---- manquait cette déclaration hwnd = GetDesktopWindow() RetVal = GetWindowRect(hwnd, R) GetScreenResolution = (R.X2 - R.X1) & "x" & (R.Y2 - R.Y1) End Function
Bonjour a tous, je voudrais ameliorer ma base de maniere à ce qu'au demarrage elle s'ouvre selon la resolution de mon ecran, j'avais il y a un an obtenu de "Drizzit" la procedure ci-dessous, mais malheureusement ça marche pas, j'ai un message qui me dis: " type d'argument Byref incompatible"
' resolution de l'ecran 'Type rect ' X1 As Long ' Y1 As Long ' X2 As Long ' Y2 As Long 'End Type 'Declare Function getdesktopwindow Lib "user32" () As Long 'Declare Function getwindowrect Lib "user32" (ByVal hwnd As Long, rectangle As rect) As Long 'Function getscreenresolution() As String ' hwnd = getdesktopwindow() ' retvai = getwindowrect(hwnd, R) ' getscreenresolution = (R.X2 - R.X1) & "x" & (R.Y2 - R.Y1) 'End Function Ou est l'erreur, comment faire fonctionner cette procedure ? Merci
bonjour eric, il n'y a plus de message d'erreur, mais au lancement de la
base, il ne tiens pas compte de la resolution de l'ecran.
Enfin ça fait rien, merci quand même
--
Roger.
http://le-meruvien.skynetblogs.be/
"Eric" <f_framZZ@hotmail.com> a écrit dans le message de news:
OJBvLpGaHHA.4000@TK2MSFTNGP02.phx.gbl...
Bonjour,
Function GetScreenResolution() As String
Dim R As rect ' <---- manquait cette déclaration
hwnd = GetDesktopWindow()
RetVal = GetWindowRect(hwnd, R)
GetScreenResolution = (R.X2 - R.X1) & "x" & (R.Y2 - R.Y1)
End Function
Bonjour a tous, je voudrais ameliorer ma base de maniere à ce qu'au
demarrage elle s'ouvre selon la resolution de mon ecran, j'avais il y a
un an obtenu de "Drizzit" la procedure ci-dessous, mais malheureusement
ça marche pas, j'ai un message qui me dis: " type d'argument Byref
incompatible"
' resolution de l'ecran
'Type rect
' X1 As Long
' Y1 As Long
' X2 As Long
' Y2 As Long
'End Type
'Declare Function getdesktopwindow Lib "user32" () As Long
'Declare Function getwindowrect Lib "user32" (ByVal hwnd As Long,
rectangle As rect) As Long
'Function getscreenresolution() As String
' hwnd = getdesktopwindow()
' retvai = getwindowrect(hwnd, R)
' getscreenresolution = (R.X2 - R.X1) & "x" & (R.Y2 - R.Y1)
'End Function
Ou est l'erreur, comment faire fonctionner cette procedure ?
Merci
--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
bonjour eric, il n'y a plus de message d'erreur, mais au lancement de la base, il ne tiens pas compte de la resolution de l'ecran. Enfin ça fait rien, merci quand même
Function GetScreenResolution() As String Dim R As rect ' <---- manquait cette déclaration hwnd = GetDesktopWindow() RetVal = GetWindowRect(hwnd, R) GetScreenResolution = (R.X2 - R.X1) & "x" & (R.Y2 - R.Y1) End Function
Bonjour a tous, je voudrais ameliorer ma base de maniere à ce qu'au demarrage elle s'ouvre selon la resolution de mon ecran, j'avais il y a un an obtenu de "Drizzit" la procedure ci-dessous, mais malheureusement ça marche pas, j'ai un message qui me dis: " type d'argument Byref incompatible"
' resolution de l'ecran 'Type rect ' X1 As Long ' Y1 As Long ' X2 As Long ' Y2 As Long 'End Type 'Declare Function getdesktopwindow Lib "user32" () As Long 'Declare Function getwindowrect Lib "user32" (ByVal hwnd As Long, rectangle As rect) As Long 'Function getscreenresolution() As String ' hwnd = getdesktopwindow() ' retvai = getwindowrect(hwnd, R) ' getscreenresolution = (R.X2 - R.X1) & "x" & (R.Y2 - R.Y1) 'End Function Ou est l'erreur, comment faire fonctionner cette procedure ? Merci
Comme tu n'avais donné qu'un extrait de code, j'ai répondu pour le message d'erreur que tu avais.
Si tu veux un redimensionnement automatique des formulaires en fonction de la résolution écran de tes utilisateurs, regardes du côté de Jessy. Il propose une base en téléchargement à cette adresse : http://access.fr.free.fr/download.php?lng=fr
Il faut cliquer sur la disquette Formulaire, choisir le 3ème item. Il présente le code principal et en bas de page le téléchargement.
Bon courage.
bonjour eric, il n'y a plus de message d'erreur, mais au lancement de la base, il ne tiens pas compte de la resolution de l'ecran. Enfin ça fait rien, merci quand même
Comme tu n'avais donné qu'un extrait de code, j'ai répondu pour le
message d'erreur que tu avais.
Si tu veux un redimensionnement automatique des formulaires en fonction
de la résolution écran de tes utilisateurs, regardes du côté de Jessy.
Il propose une base en téléchargement à cette adresse :
http://access.fr.free.fr/download.php?lng=fr
Il faut cliquer sur la disquette Formulaire, choisir le 3ème item.
Il présente le code principal et en bas de page le téléchargement.
Bon courage.
bonjour eric, il n'y a plus de message d'erreur, mais au lancement de la
base, il ne tiens pas compte de la resolution de l'ecran.
Enfin ça fait rien, merci quand même
--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Comme tu n'avais donné qu'un extrait de code, j'ai répondu pour le message d'erreur que tu avais.
Si tu veux un redimensionnement automatique des formulaires en fonction de la résolution écran de tes utilisateurs, regardes du côté de Jessy. Il propose une base en téléchargement à cette adresse : http://access.fr.free.fr/download.php?lng=fr
Il faut cliquer sur la disquette Formulaire, choisir le 3ème item. Il présente le code principal et en bas de page le téléchargement.
Bon courage.
bonjour eric, il n'y a plus de message d'erreur, mais au lancement de la base, il ne tiens pas compte de la resolution de l'ecran. Enfin ça fait rien, merci quand même
merci beaucoup! tiens, un truc qui me dépasse! (je crois que je vieillit!) dans un formulaire tout bête, qui recense les communes françaises, j'ai un champ texte. dans la table, il s'affiche bien, mais dans mon formulaire, au lieu d'afficher le texte, il m'affiche un chiffre!!
Comme tu n'avais donné qu'un extrait de code, j'ai répondu pour le message d'erreur que tu avais.
Si tu veux un redimensionnement automatique des formulaires en fonction de la résolution écran de tes utilisateurs, regardes du côté de Jessy. Il propose une base en téléchargement à cette adresse : http://access.fr.free.fr/download.php?lng=fr
Il faut cliquer sur la disquette Formulaire, choisir le 3ème item. Il présente le code principal et en bas de page le téléchargement.
Bon courage.
bonjour eric, il n'y a plus de message d'erreur, mais au lancement de la base, il ne tiens pas compte de la resolution de l'ecran. Enfin ça fait rien, merci quand même
merci beaucoup!
tiens, un truc qui me dépasse! (je crois que je vieillit!)
dans un formulaire tout bête, qui recense les communes françaises, j'ai un
champ texte.
dans la table, il s'affiche bien, mais dans mon formulaire, au lieu
d'afficher le texte, il m'affiche un chiffre!!
--
Roger.
http://le-meruvien.skynetblogs.be/
"Eric" <f_framZZ@hotmail.com> a écrit dans le message de news:
usZKeoIaHHA.4396@TK2MSFTNGP06.phx.gbl...
Bonjour Roger,
Comme tu n'avais donné qu'un extrait de code, j'ai répondu pour le message
d'erreur que tu avais.
Si tu veux un redimensionnement automatique des formulaires en fonction de
la résolution écran de tes utilisateurs, regardes du côté de Jessy. Il
propose une base en téléchargement à cette adresse :
http://access.fr.free.fr/download.php?lng=fr
Il faut cliquer sur la disquette Formulaire, choisir le 3ème item.
Il présente le code principal et en bas de page le téléchargement.
Bon courage.
bonjour eric, il n'y a plus de message d'erreur, mais au lancement de la
base, il ne tiens pas compte de la resolution de l'ecran.
Enfin ça fait rien, merci quand même
--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
merci beaucoup! tiens, un truc qui me dépasse! (je crois que je vieillit!) dans un formulaire tout bête, qui recense les communes françaises, j'ai un champ texte. dans la table, il s'affiche bien, mais dans mon formulaire, au lieu d'afficher le texte, il m'affiche un chiffre!!
Comme tu n'avais donné qu'un extrait de code, j'ai répondu pour le message d'erreur que tu avais.
Si tu veux un redimensionnement automatique des formulaires en fonction de la résolution écran de tes utilisateurs, regardes du côté de Jessy. Il propose une base en téléchargement à cette adresse : http://access.fr.free.fr/download.php?lng=fr
Il faut cliquer sur la disquette Formulaire, choisir le 3ème item. Il présente le code principal et en bas de page le téléchargement.
Bon courage.
bonjour eric, il n'y a plus de message d'erreur, mais au lancement de la base, il ne tiens pas compte de la resolution de l'ecran. Enfin ça fait rien, merci quand même
Quelle est la nature du contrôle du formulaire affichant le chiffre/nombre ?
merci beaucoup! tiens, un truc qui me dépasse! (je crois que je vieillit!) dans un formulaire tout bête, qui recense les communes françaises, j'ai un champ texte. dans la table, il s'affiche bien, mais dans mon formulaire, au lieu d'afficher le texte, il m'affiche un chiffre!!
Quelle est la nature du contrôle du formulaire affichant le chiffre/nombre ?
merci beaucoup!
tiens, un truc qui me dépasse! (je crois que je vieillit!)
dans un formulaire tout bête, qui recense les communes françaises, j'ai un
champ texte.
dans la table, il s'affiche bien, mais dans mon formulaire, au lieu
d'afficher le texte, il m'affiche un chiffre!!
--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Quelle est la nature du contrôle du formulaire affichant le chiffre/nombre ?
merci beaucoup! tiens, un truc qui me dépasse! (je crois que je vieillit!) dans un formulaire tout bête, qui recense les communes françaises, j'ai un champ texte. dans la table, il s'affiche bien, mais dans mon formulaire, au lieu d'afficher le texte, il m'affiche un chiffre!!
dans la liste de choix de la tbl, il était definie en liste deroulante, mais je l'ai mis en zone de texte, et malgrés ça, dans le form, il affiche toujours un chiffre, alors que dans la tbl il affiche bien de nom
Quelle est la nature du contrôle du formulaire affichant le chiffre/nombre ?
merci beaucoup! tiens, un truc qui me dépasse! (je crois que je vieillit!) dans un formulaire tout bête, qui recense les communes françaises, j'ai un champ texte. dans la table, il s'affiche bien, mais dans mon formulaire, au lieu d'afficher le texte, il m'affiche un chiffre!!
dans la liste de choix de la tbl, il était definie en liste deroulante, mais
je l'ai mis en zone de texte, et malgrés ça, dans le form, il affiche
toujours un chiffre, alors que dans la tbl il affiche bien de nom
--
Roger.
http://le-meruvien.skynetblogs.be/
"Eric" <f_framZZ@hotmail.com> a écrit dans le message de news:
OcK8EkLaHHA.4872@TK2MSFTNGP03.phx.gbl...
re,
Quelle est la nature du contrôle du formulaire affichant le chiffre/nombre
?
merci beaucoup!
tiens, un truc qui me dépasse! (je crois que je vieillit!)
dans un formulaire tout bête, qui recense les communes françaises, j'ai
un champ texte.
dans la table, il s'affiche bien, mais dans mon formulaire, au lieu
d'afficher le texte, il m'affiche un chiffre!!
--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
dans la liste de choix de la tbl, il était definie en liste deroulante, mais je l'ai mis en zone de texte, et malgrés ça, dans le form, il affiche toujours un chiffre, alors que dans la tbl il affiche bien de nom
Quelle est la nature du contrôle du formulaire affichant le chiffre/nombre ?
merci beaucoup! tiens, un truc qui me dépasse! (je crois que je vieillit!) dans un formulaire tout bête, qui recense les communes françaises, j'ai un champ texte. dans la table, il s'affiche bien, mais dans mon formulaire, au lieu d'afficher le texte, il m'affiche un chiffre!!
Dans la liste de choix de la table tu as du construire sa source à partir d'une requête, faite sur une table, contenant un champ numérique et un champ texte en précisant 2 colonnes, que la colonne liée était la 1 et defini les largeurs à 0 cm pour la 1ere et x cm pour la seconde. Dans la table, il affiche le texte car la 1ere colonne stocke la clé primaire et sa largeur est nulle. Dans le formulaire, tu as remplacé la liste déroulante par une zone de texte donc cette dernière contient la valeur de la 1ere colonne de ta liste déroulante ce qui affiche le chiffre.
dans la liste de choix de la tbl, il était definie en liste deroulante, mais je l'ai mis en zone de texte, et malgrés ça, dans le form, il affiche toujours un chiffre, alors que dans la tbl il affiche bien de nom
Dans la liste de choix de la table tu as du construire sa source à
partir d'une requête, faite sur une table, contenant un champ numérique
et un champ texte en précisant 2 colonnes, que la colonne liée était la
1 et defini les largeurs à 0 cm pour la 1ere et x cm pour la seconde.
Dans la table, il affiche le texte car la 1ere colonne stocke la clé
primaire et sa largeur est nulle.
Dans le formulaire, tu as remplacé la liste déroulante par une zone de
texte donc cette dernière contient la valeur de la 1ere colonne de ta
liste déroulante ce qui affiche le chiffre.
dans la liste de choix de la tbl, il était definie en liste deroulante, mais
je l'ai mis en zone de texte, et malgrés ça, dans le form, il affiche
toujours un chiffre, alors que dans la tbl il affiche bien de nom
--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Dans la liste de choix de la table tu as du construire sa source à partir d'une requête, faite sur une table, contenant un champ numérique et un champ texte en précisant 2 colonnes, que la colonne liée était la 1 et defini les largeurs à 0 cm pour la 1ere et x cm pour la seconde. Dans la table, il affiche le texte car la 1ere colonne stocke la clé primaire et sa largeur est nulle. Dans le formulaire, tu as remplacé la liste déroulante par une zone de texte donc cette dernière contient la valeur de la 1ere colonne de ta liste déroulante ce qui affiche le chiffre.
dans la liste de choix de la tbl, il était definie en liste deroulante, mais je l'ai mis en zone de texte, et malgrés ça, dans le form, il affiche toujours un chiffre, alors que dans la tbl il affiche bien de nom