Nous utilisons des cookies pour vous garantir la meilleure expérience sur notre site. Si vous continuez à utiliser ce dernier, nous considèrerons que vous acceptez l'utilisation des cookies. J'ai compris ! ou En savoir plus !.
banniere

Le portail francophone de la géomatique


Toujours pas inscrit ? Mot de passe oublié ?
Nom d'utilisateur    Mot de passe              Toujours pas inscrit ?   Mot de passe oublié ?

#1 Wed 27 November 2002 16:45

Bob Bobby13
Invité

Mapbasic code pour presse papiers et copier-coller

Bonjour,

je recherche la ligne de code permettant de dupliquer une fenetre carte (bouton de la barre d'outils general dupliquer une fenetre carte - drag and drop) dans une autre application (word,access...).

En outre, je recherche les lignes de code permettant :
de copier des objets (fenetre carte par exple) dans le presse papiers et,
de recuperer des objets du presse papiers.

merci de votre aide.

 

#2 Wed 27 November 2002 16:45

Jacques Paris
Invité

Re: Mapbasic code pour presse papiers et copier-coller

Windowinfo(,WIN_INFO_CLONEWINOW)
(code numerique 15)

retourne une variable caracteres avec toutes les instructions voulues pour cloner la fenetre, meme les couches thematiques.

Je ne connais pas les equivalents des commandes du type +C cheres à Windows et au presse-papier. Il n'y a aucune contrepartie de celles-ci dans la fenetre MapBasic, ce qui est une mauvaise indication. S'il s'agit de rester  dans MapBasic, on passe generalement par des  select  suivis d'insert

Jacques Paris

 

#3 Fri 29 November 2002 09:50

Olivier Dumas
Invité

Re: Mapbasic code pour presse papiers et copier-coller

De: Olivier
Voici une procedure d'une de mes applis qui copie le(s) objet(s) selectionne(s) dans certaines couches vers une couche donnee. S'il y a plrs objets ils sont automatiquement assembles et on enchaine sur la boite de dialogue qui gere les attributs :

Sub Creat_EI_selection

dim nblig,NumCouche,numlig as smallint,
tabsel,EICourant as string,
Numplan as integer

NumPlan=FrontWindow()
tabsel=SelectionInfo(SEL_INFO_TABLENAME)
if tabsel  PARCELLE and tabsel  BATI and tabsel  PARC_DGI
then
if tabsel=
then
Note Pas de selection en cours
else
Note La selection courante ne concerne pas une parcelle ou un batiment
end if
else
nblig=SelectionInfo(SEL_INFO_NROWS)
numcouche=RechNumCCTable ( EIGeo ,NumPlan)
print Copie de la selection ...
run menu command 203
set map layer numcouche editable on
run menu command 204
if nblig > 1
then
print Assemblage des objets ...
Objects combine
end if

EICourant=EnsImm
Call MasqSaisie ( Ensemble Immobilier ,EICourant)
numlig=TableInfo(EIGeo,TAB_INFO_NROWS)
update EIGeo set CodeEI=EICourant where RowID=numlig

end if

End sub

 

Pied de page des forums

Powered by FluxBB