Re: [users-fr] Agrandissement d'un formulaire
APACHE 46 a écrit : Bonjour de CAHORS 46. J'ai besoin d'aide et n'étant pas un pro de la macro, je m'adresse aux professionnels de l'informatique. J'ai créé des formulaires à partir d'une base de données et lorsque je les utilise ils ne s'ouvrent pas complètement sur la fenêtre. J'aimerai, si s'est possible, les agrandir à l'ouverture. Je suppose qu'il faut une macro et je ne suis pas assez compétent pour la réaliser, c'est la raison pour laquelle je m'adresse à la communauté. Merci d'avance pour votre aide. HR Bonjour, François avait envoyé un message avec cette adresse il y a 6 mois. As tu pu voir si ça fonctionnait ? J.M Voici un post de 2005 (ça ne nous rajeunit guère) concernant une macro pour passer en mode plein écran : http://fr.openoffice.org/servlets/ReadMsg?listName=users&msgNo=31369 Pour un formulaire Base tu peux donc par ce biais agrandir la fenêtre. Francois - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
Re: [users-fr] Agrandissement d'un formulaire
Je te remercie pour ta réponse. Effectivement cela fonctionne en mode plein écran mais cela fait disparaitre les barre d'outils: "normale" et "navigation pour formulaire". Pour ma part je souhaite que ces barre d'outils reste au dessus du formulaire. [EMAIL PROTECTED] a écrit : APACHE 46 a écrit : Bonjour de CAHORS 46. J'ai besoin d'aide et n'étant pas un pro de la macro, je m'adresse aux professionnels de l'informatique. J'ai créé des formulaires à partir d'une base de données et lorsque je les utilise ils ne s'ouvrent pas complètement sur la fenêtre. J'aimerai, si s'est possible, les agrandir à l'ouverture. Je suppose qu'il faut une macro et je ne suis pas assez compétent pour la réaliser, c'est la raison pour laquelle je m'adresse à la communauté. Merci d'avance pour votre aide. HR Bonjour, François avait envoyé un message avec cette adresse il y a 6 mois. As tu pu voir si ça fonctionnait ? J.M Voici un post de 2005 (ça ne nous rajeunit guère) concernant une macro pour passer en mode plein écran : http://fr.openoffice.org/servlets/ReadMsg?listName=users&msgNo=31369 Pour un formulaire Base tu peux donc par ce biais agrandir la fenêtre. Francois - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
Re: [users-fr] Agrandissement d'un formulaire
Effectivement j'ai testé la macro mais je me heurte à un problème au niveau du lancement du formulaire j'ai cette erreur qui apparait REM * BASIC * Sub ChangeTaillePositionFenetre dim oCadre as Object dim oFenetre as Object dim oRect as Object dim nHauteur as Integer dim nLargeur as Integer dim nPosX as Integer dim nPosY as Integer oCadre = StarDesktop.getCurrentFrame() oFenetre = oCadre.getContainerWindow() (A cette ligne j'ai une l'erreur suivante :) oRect = oFenetre.getPosSize()(*variable d'objet non définie*) nPosX = oRect.X nPosY = oRect.Y nHauteur = 550 nLargeur = 800 oFenetre.setPosSize(nPosX, nPosY, nLargeur, nHauteur, 15) End Sub [EMAIL PROTECTED] a écrit : APACHE 46 a écrit : Bonjour de CAHORS 46. J'ai besoin d'aide et n'étant pas un pro de la macro, je m'adresse aux professionnels de l'informatique. J'ai créé des formulaires à partir d'une base de données et lorsque je les utilise ils ne s'ouvrent pas complètement sur la fenêtre. J'aimerai, si s'est possible, les agrandir à l'ouverture. Je suppose qu'il faut une macro et je ne suis pas assez compétent pour la réaliser, c'est la raison pour laquelle je m'adresse à la communauté. Merci d'avance pour votre aide. HR Bonjour, François avait envoyé un message avec cette adresse il y a 6 mois. As tu pu voir si ça fonctionnait ? J.M Voici un post de 2005 (ça ne nous rajeunit guère) concernant une macro pour passer en mode plein écran : http://fr.openoffice.org/servlets/ReadMsg?listName=users&msgNo=31369 Pour un formulaire Base tu peux donc par ce biais agrandir la fenêtre. Francois - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
Re: [users-fr] Agrandissement d'un formulaire
APACHE 46 a écrit : Suite à un petit problème je renvoi ce message Effectivement j'ai testé la macro mais je me heurte à un problème au niveau du lancement du formulaire j'ai cette erreur qui apparait REM * BASIC * Sub ChangeTaillePositionFenetre dim oCadre as Object dim oFenetre as Object dim oRect as Object dim nHauteur as Integer dim nLargeur as Integer dim nPosX as Integer dim nPosY as Integer oCadre = StarDesktop.getCurrentFrame() oFenetre = oCadre.getContainerWindow() (*A cette ligne j'ai une l'erreur suivante : variable d'objet non définie) * oRect = oFenetre.getPosSize() nPosX = oRect.X nPosY = oRect.Y nHauteur = 550 nLargeur = 800 oFenetre.setPosSize(nPosX, nPosY, nLargeur, nHauteur, 15) End Sub [EMAIL PROTECTED] a écrit : APACHE 46 a écrit : Bonjour de CAHORS 46. J'ai besoin d'aide et n'étant pas un pro de la macro, je m'adresse aux professionnels de l'informatique. J'ai créé des formulaires à partir d'une base de données et lorsque je les utilise ils ne s'ouvrent pas complètement sur la fenêtre. J'aimerai, si s'est possible, les agrandir à l'ouverture. Je suppose qu'il faut une macro et je ne suis pas assez compétent pour la réaliser, c'est la raison pour laquelle je m'adresse à la communauté. Merci d'avance pour votre aide. HR Bonjour, François avait envoyé un message avec cette adresse il y a 6 mois. As tu pu voir si ça fonctionnait ? J.M Voici un post de 2005 (ça ne nous rajeunit guère) concernant une macro pour passer en mode plein écran : http://fr.openoffice.org/servlets/ReadMsg?listName=users&msgNo=31369 Pour un formulaire Base tu peux donc par ce biais agrandir la fenêtre. Francois - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
Re: [users-fr] Agrandissement d'un formulaire
APACHE 46 a écrit : Effectivement j'ai testé la macro mais je me heurte à un problème au niveau du lancement du formulaire j'ai cette erreur qui apparait REM * BASIC * Sub ChangeTaillePositionFenetre dim oCadre as Object dim oFenetre as Object dim oRect as Object dim nHauteur as Integer dim nLargeur as Integer dim nPosX as Integer dim nPosY as Integer oCadre = StarDesktop.getCurrentFrame() oFenetre = oCadre.getContainerWindow() (A cette ligne j'ai une l'erreur suivante :) oRect = oFenetre.getPosSize()(*variable d'objet non définie*) nPosX = oRect.X nPosY = oRect.Y nHauteur = 550 nLargeur = 800 oFenetre.setPosSize(nPosX, nPosY, nLargeur, nHauteur, 15) End Sub A tout hasard, il manque sans doute la macro d'ouverture du formulaire : Function OpenForm( formContainer as variant, oConnection as variant, sFormName as string, optional strMode as string ) as variant Dim aProp(1) As New com.sun.star.beans.PropertyValue dim openMode as string if ismissing( strMode ) then openMode = "open" else openMode = strMode endif aProp(0).Name = "ActiveConnection" aProp(0).Value = oConnection aProp(1).Name = "OpenMode" aProp(1).Value = strMode OpenForm = formContainer.loadComponentFromURL(sFormName,"_blank",0,aProp()) End Function - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
Re: [users-fr] Agrandissement d'un formulaire
Tu vas me trouver un peu pénible je te remercie une nouvelle fois pour ton aide. J'ai mis les macro l'une à la suite de l'autre. La première étant a macro d'ouverture du formulaire. A cette ligne openMode = "open" j'ai le message suivant erreur de syntaxe. [EMAIL PROTECTED] a écrit : APACHE 46 a écrit : Effectivement j'ai testé la macro mais je me heurte à un problème au niveau du lancement du formulaire j'ai cette erreur qui apparait REM * BASIC * Sub ChangeTaillePositionFenetre dim oCadre as Object dim oFenetre as Object dim oRect as Object dim nHauteur as Integer dim nLargeur as Integer dim nPosX as Integer dim nPosY as Integer oCadre = StarDesktop.getCurrentFrame() oFenetre = oCadre.getContainerWindow() oRect = oFenetre.getPosSize() nPosX = oRect.X nPosY = oRect.Y nHauteur = 550 nLargeur = 800 oFenetre.setPosSize(nPosX, nPosY, nLargeur, nHauteur, 15) End Sub A tout hasard, il manque sans doute la macro d'ouverture du formulaire : Function OpenForm( formContainer as variant, oConnection as variant, sFormName as string, optional strMode as string ) as variant Dim aProp(1) As New com.sun.star.beans.PropertyValue dim openMode as string if ismissing( strMode ) then openMode = "open" else openMode = strMode endif aProp(0).Name = "ActiveConnection" aProp(0).Value = oConnection aProp(1).Name = "OpenMode" aProp(1).Value = strMode OpenForm = formContainer.loadComponentFromURL(sFormName,"_blank",0,aProp()) End Function - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
Re: [users-fr] Agrandissement d'un formulaire
APACHE 46 a écrit : Tu vas me trouver un peu pénible je te remercie une nouvelle fois pour ton aide. J'ai mis les macro l'une à la suite de l'autre. La première étant a macro d'ouverture du formulaire. A cette ligne openMode = "open" j'ai le message suivant erreur de syntaxe. [EMAIL PROTECTED] a écrit : APACHE 46 a écrit : Effectivement j'ai testé la macro mais je me heurte à un problème au niveau du lancement du formulaire j'ai cette erreur qui apparait REM * BASIC * Sub ChangeTaillePositionFenetre dim oCadre as Object dim oFenetre as Object dim oRect as Object dim nHauteur as Integer dim nLargeur as Integer dim nPosX as Integer dim nPosY as Integer oCadre = StarDesktop.getCurrentFrame() oFenetre = oCadre.getContainerWindow() oRect = oFenetre.getPosSize() nPosX = oRect.X nPosY = oRect.Y nHauteur = 550 nLargeur = 800 oFenetre.setPosSize(nPosX, nPosY, nLargeur, nHauteur, 15) End Sub A tout hasard, il manque sans doute la macro d'ouverture du formulaire : Function OpenForm( formContainer as variant, oConnection as variant, sFormName as string, optional strMode as string ) as variant Dim aProp(1) As New com.sun.star.beans.PropertyValue dim openMode as string if ismissing( strMode ) then openMode = "open" else openMode = strMode endif aProp(0).Name = "ActiveConnection" aProp(0).Value = oConnection aProp(1).Name = "OpenMode" aProp(1).Value = strMode OpenForm = formContainer.loadComponentFromURL(sFormName,"_blank",0,aProp()) End Function - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
Re: [users-fr] Agrandissement d'un formulaire
Je renvoie ce message en espérant qu'un professionnel de la macro me trouvera une solution. J'ai besoin d'aide et n'étant pas un pro de la macro, je m'adresse aux professionnels de l'informatique. J'ai créé des formulaires à partir d'une base de données et lorsque je les utilise ils ne s'ouvrent pas complètement sur la fenêtre. J'aimerai, si s'est possible, les agrandir à l'ouverture. Je suppose qu'il faut une macro et je ne suis pas assez compétent pour la réaliser, c'est la raison pour laquelle je m'adresse à la communauté. Merci d'avance pour votre aide car je n'arrive pas à concrétiser malgré l'aide apporter par la communauté près avoir testé les deux macros jointes. APACHE 46 a écrit : Tu vas me trouver un peu pénible je te remercie une nouvelle fois pour ton aide. J'ai mis les macro l'une à la suite de l'autre. La première étant a macro d'ouverture du formulaire. A cette ligne openMode = "open" j'ai le message suivant erreur de syntaxe. [EMAIL PROTECTED] a écrit : APACHE 46 a écrit : Effectivement j'ai testé la macro mais je me heurte à un problème au niveau du lancement du formulaire j'ai cette erreur qui apparait REM * BASIC * Sub ChangeTaillePositionFenetre dim oCadre as Object dim oFenetre as Object dim oRect as Object dim nHauteur as Integer dim nLargeur as Integer dim nPosX as Integer dim nPosY as Integer oCadre = StarDesktop.getCurrentFrame() oFenetre = oCadre.getContainerWindow() oRect = oFenetre.getPosSize() nPosX = oRect.X nPosY = oRect.Y nHauteur = 550 nLargeur = 800 oFenetre.setPosSize(nPosX, nPosY, nLargeur, nHauteur, 15) End Sub A tout hasard, il manque sans doute la macro d'ouverture du formulaire : Function OpenForm( formContainer as variant, oConnection as variant, sFormName as string, optional strMode as string ) as variant Dim aProp(1) As New com.sun.star.beans.PropertyValue dim openMode as string if ismissing( strMode ) then openMode = "open" else openMode = strMode endif aProp(0).Name = "ActiveConnection" aProp(0).Value = oConnection aProp(1).Name = "OpenMode" aProp(1).Value = strMode OpenForm = formContainer.loadComponentFromURL(sFormName,"_blank",0,aProp()) End Function - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
Re: [users-fr] Agrandissement d'un formulaire
Bonjour, APACHE 46 a écrit : Je renvoie ce message en espérant qu'un professionnel de la macro me trouvera une solution. J'ai créé des formulaires à partir d'une base de données et lorsque je les utilise ils ne s'ouvrent pas complètement sur la fenêtre. J'aimerai, si s'est possible, les agrandir à l'ouverture. Je suppose qu'il faut une macro et je ne suis pas assez compétent pour la réaliser, c'est la raison pour laquelle je m'adresse à la communauté. Merci d'avance pour votre aide Si j'ai bien compris le problème (?), voici une idée pour que le formulaire s'ouvre sur toute la taille de l'écran. sub BaseFormResize 'Pour info 'http://api.openoffice.org/docs/common/ref/com/sun/star/awt/XWindow.html#setPosSize 'http://api.openoffice.org/docs/common/ref/com/sun/star/awt/PosSize.html dim oDocas object dim oWindow as object oDoc= thisComponent oWindow = oDoc.getCurrentController().getFrame().getContainerWindow() oWindow.setPosSize( 0, 0, 1280, 800, 15 ) end sub Francois Gatto - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
Re: [users-fr] Agrandissement d'un formulaire
Merci François pour ton aide. Cela fonctionne et va me simplifier la tâche. Bravo pour l'aide fourni par la communauté au petit joueur que je suis . Francois Gatto a écrit : Bonjour, APACHE 46 a écrit : Je renvoie ce message en espérant qu'un professionnel de la macro me trouvera une solution. J'ai créé des formulaires à partir d'une base de données et lorsque je les utilise ils ne s'ouvrent pas complètement sur la fenêtre. J'aimerai, si s'est possible, les agrandir à l'ouverture. Je suppose qu'il faut une macro et je ne suis pas assez compétent pour la réaliser, c'est la raison pour laquelle je m'adresse à la communauté. Merci d'avance pour votre aide Si j'ai bien compris le problème (?), voici une idée pour que le formulaire s'ouvre sur toute la taille de l'écran. sub BaseFormResize 'Pour info 'http://api.openoffice.org/docs/common/ref/com/sun/star/awt/XWindow.html#setPosSize 'http://api.openoffice.org/docs/common/ref/com/sun/star/awt/PosSize.html dim oDocas object dim oWindow as object oDoc= thisComponent oWindow = oDoc.getCurrentController().getFrame().getContainerWindow() oWindow.setPosSize( 0, 0, 1280, 800, 15 ) end sub Francois Gatto - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]