Annonce
#1 Mon 24 January 2005 00:13
- ROBIN Thomas
- Invité
Fonction FileOpenDLG
Re bonjour,
Et oui j'ai encore une question ...
Pourquoi lorsque l'on utilise la fonction /*FileOpenDLG */on
n'obtient pas tout a fait la meme fenetre que lorsqu'on utilise*/
Fichier / Ouvrir/*.
En fait je voudrais avoir le choix dans la liste : /*ajouter a
la fenetre carte courante, nouvelle fenetre ...*/
La solution existe-t-elle ??
Merci d'avance et bonne soiree a tous.
Thomas
THOMAS ROBIN
CNASEA GUYANE
Responsable Info / SIG / SGBD
4 rue Louis Blanc
97300 CAYENNE
#2 Tue 25 January 2005 10:24
- Sigeal
- Invité
Re: Fonction FileOpenDLG
Bonjour,
Tu peux utiliser la command standard MapInfo :
Run Menu Command M_FILE_OPEN
En n'oubliant pas d'ajouter :
Include Menu.def
Ou simplement :
Run Menu Command 102
(Voir le fichier Menu.def dans le repertoire MapBasic)
Cordialement
Christophe Damour (SIGeal)
#3 Tue 25 January 2005 13:18
- Antoine DELARUE
- Invité
Re: Fonction FileOpenDLG
j'ai 2 questions, je ne possede pas Mapbasic, mais je travaille dans la fenetre Mapbasic de MI7.
1-A quoi correspondent les parametres de la fonction FileOpenDlg?
2-existe-t-il une fonction equivalente pour enregistrer sous et permettant de choisir le nom du fichier?
Merci d'avance
Antoine
Antoine DELARUE
Ingenieur forestier
Centre Regional de la Propriete Forestiere de Midi-Pyrenees
#4 Tue 25 January 2005 13:18
- ROBIN Thomas
- Invité
Re: Fonction FileOpenDLG
Bonjour
Mais fileopendlg n'ouvre pas la table, il retourne simplement le chemin complet de la table c:`mesdocument ... dans une variable.
Dans l'ai de MB :
/*FileOpenDlg( path , filename , filetype , prompt )
_path_ is a String value, indicating the directory or folder to choose files from
_filename_ is a String value, indicating the default file name for the user to choose; on the Macintosh, this parameter should be an empty string ( )
_filetype_ is a String value, three or four characters, indicating a file type (e.g. TAB to specify tables)
_prompt_ is a String title that appears on the bar at the top of the dialog
*/
Pour enregister sous il faut :
/*Commit table ma_table_a_enregister as C:`... nom_nouveaue_de_la_table.TAB */
ainsi on peut ecrire ceci en combinat les deux fonctions : /*
sub enregistrement_rq
Dim question As Logical
Dim record_query as string
question = false
question = Ask( Voulez vous enregistrez la selection en cours ? , OUI , NON )
If question = true then
record_query = filesaveasdlg( G: , QUERY , TAB , ENREGISTREMENT DE LA SELECTION EN COURS )
if record_query then
commit table REQ_EN_COURS as record_query
else
exit sub
end if
ELSE
note BEN ZUT ALORS !!!
end if
end sub
*/
Merci a Jacques Paris et aux autres pour leur aide d'hier !!!
Bon courage et a bientot
thomas
