Re: MI MB: Creating and Committing tables (Urgent!)
Hi Chris, The problem is in the Commit Table line. You cannot specify a filename in the way you do it here. You have to enter the full path to the files location, that is either a UNC or a hard-/network drive. Like this: Commit Table x2010dm_TR_100plus As "D: \working\96-10dm\x2010dm_TR_100plus.TAB" If working is the name of a variable with a path, then this is the way: Commit Table x2010dm_TR_100plus As working + " \96-10dm\x2010dm_TR_100plus.TAB" Best regards, Peter Peter Moller[EMAIL PROTECTED] GIS-Developer Direct: +45 6313 5008 KampsaxVoice: +45 6313 5013 Rugaardsvej 55 Faximile: +45 6313 5090 DK 5000 Odense CWeb: www.mapinfo.dk MapInfo Authorized Partner --- Chris Martin wrote: I've got some code which takes in some data, does some calculations and then produces a host of other tables... e.g. Select NISLID, R_FLOW, RDNAME, FLOW, FLOW / R_FLOW "Stress_All" from x2010dm_TR where Flow_Category = 3 into x2010dm_TR_100plus Commit Table x2010dm_TR_100plus As "working\96-10dm\x2010dm_TR_100plus.TAB" TYPE NATIVE Charset "WindowsLatin1" -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
Re: MI MB Dangling Nodes
Hello Hendrik You could use RW Net for this. It creates topology in your polylines and can find polylines where the end-node of has a valency of 1 (=dangling node). It can also locate groups of subnets, that is polylines, which isn't connected to the rest of the network. RW Net is a DLL, which can easily be integrated with MapBasic. If you find that this is too much for your needs, you could roughly do it this way: Extract all end coordinates of the polylines into "tmp1" and make a SQL-query like this: select x,y,count() from tmp1 group by x,y into tmp2 and then join tmp2 with tmp1. Now you can check _COL3 for the value of 1. But be warned: This is very slow in MapBasic, if your tables have any significant size. Regards Uffe Kousgaard www.routeware.dk - Original Message - From: "Possberg, Hendrik (Fa. Microm)" <[EMAIL PROTECTED]> To: "'0 Mapinfo Newsgroup'" <[EMAIL PROTECTED]> Sent: Monday, September 25, 2000 4:48 PM Subject: MI MB Dangling Nodes Hello all, for a project I have to copy and move plines and then connect endnodes with endnodes of other plines. After this part of work is done, I´d like to be sure that there are no plines left in the front window with dangling nodes. I would like to integrate this search into a MapBasic Code, which should run with a click on a button. Any Suggestions would be helpful. Hendrik Poßberg -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB Dangling Nodes
Hello all, for a project I have to copy and move plines and then connect endnodes with endnodes of other plines. After this part of work is done, I´d like to be sure that there are no plines left in the front window with dangling nodes. I would like to integrate this search into a MapBasic Code, which should run with a click on a button. Any Suggestions would be helpful. Hendrik Poßberg
RE: MI MB: Run Command Limitation
-- Videresendt af Peter Laulund/MI/KMS - 25-09-2000 12:13 --- Peter Laulund 25-09-2000 11:07 Til: [EMAIL PROTECTED], [EMAIL PROTECTED] cc:[EMAIL PROTECTED] Vedrørende:RE: MI MB: Run Command Limitation (Document link not converted) Hi I have just createt a Commandstring with 665 characters and run it with no problems. The string i create is a insert command of the form Insert Into MyTab COLMNAME1, COLMNAME2,.. Select COLMNAME1, COLMNAME2,.. from MyTabNr2 this indicate that the maximum length of the string depend of the type of expresion fx this code will just run until i = 62 dim s as string, i as smallint S = "print 1" onerror goto fejl for i = 1 to 1000 s = s & " + 1" 'print s run command s next fejl: Print i print error$() Med venlig hilsen Peter Laulund * Kort & Matrikelstyrelsen · www.kms.dk National Survey and Cadastre - Denmark Rentemestervej 8 · DK 2400 København NV E-mail: [EMAIL PROTECTED] · Home: [EMAIL PROTECTED] Phone: +45 3587 5050 · Direct: +45 3587 5173 * "Jacques Paris" <[EMAIL PROTECTED]> - 21-09-2000 16:17:56 Til:"Mike Taylor" <[EMAIL PROTECTED]>, "'Mapinfo List'" <[EMAIL PROTECTED]> cc: (bcc: Peter Laulund/MI/KMS) Vedrørende:RE: MI MB: Run Command Limitation I have written the most sophisticated program of all : dim a,b as string onerror goto crash a="" boucle: a=a+"A" b="print "+""""+a+"""" print len(b) run command b goto boucle goto fin crash: print "error "+err() fin: end program and it gets stuck on a command at 508 characters (error 965, expression too complex). The run command accepts thus a string of 507characters. That would be 512 - 5 (let us assume that it is some code id). Aren't they other places in MI where the 512 character limit is imposed? Don't I remember something of the sort with the "where" clause of the SQL requester? Jacques PARIS e-mail[EMAIL PROTECTED] For MapInfo support, see the Paris PC Consult enr. site at http://www.total.net/~rparis/gisproducts.htm -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of Mike Taylor Sent: September 21, 2000 1:04 AM To: 'Mapinfo List' Subject: RE: MI MB: Run Command Limitation Hi again Seems I spat the dummy at the wrong statement. I changed the string (from select to print) that I was sending to run command. eg, From: qs = "select ... ... from table into anothertable" run command qs To: qs = "print ""select ... ... from table into anothertable""" run command qs This worked fine, so I will change my question to why is this happening with select?? The amount of characters seems to be variable as well depending on the expression? I've attached a program which will generate the problem on my machine. -Original Message- From: Mike Taylor [mailto:[EMAIL PROTECTED]] Sent: Thursday, 21 September 2000 15:20 To: 'Mapinfo List' Subject: MI MB: Run Command Limitation Hi I seem to have run into a size limitation on the string you can pass to run command. It works when I trim the string down to 421 characters and fails (badly, invalid page fault) when it is 422 characters. The command also fails when I put it into the mapbasic window of professional. Is there any workaround for this? Why is 422 the magic number? -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] Med venlig hilsen Peter Laulund * Kort & Matrikelstyrelsen · www.kms.dk National Survey and Cadastre - Denmark Rentemestervej 8 · DK 2400 København NV E-mail: [EMAIL PROTECTED] · Home: [EMAIL PROTECTED] Phone: +45 3587 5050 · Direct: +45 3587 5173 * Med venlig hilsen Peter Laulund * Kort & Matrikelstyrelsen · www.kms.dk National Survey and Cadastre - Denmark Rentemestervej 8 · DK 2400 København NV E-mail: [EMAIL PROTECTED] · Home: [EMAIL PROTECTED] Phone: +45 3587 5050 · Direct: +45 3587 5173 * -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB: My MB app gives 'blue screen of death' - why?
Hi, I know this is a huge question, but I'm curious as to why my Mapbasic program (written purely in MB, making no weird OLE/DLL calls etc) is causing the blue screen of death. (Fatal exception error). I know nothing about WinAPI (what is it anyhow?) and figured that with 128mb RAM and an Athlon750 I'd be able to use as many variable etc as I liked. What am I doing wrong? *Michelle SmithTechnical ManagerFrontier Mapping Pty Ltd**
SV: MI MB: Creating and Committing tables (Urgent!)
Martin: I think you have a folder-problem!. The command-line: Commit Table x2010dm_TR_100plus As "working\96-10dm\x2010dm_TR_100plus.TAB" ..refers to the current folder (which changes) plus "working\96-10dm\". Therefore the folder problably doesn't exists, which causes the error. Instead use an absolute path or use ApplicationDirectory$(), ProgramDirectory$() or HomeDirectory$() as part of the path. regards Poul Skyum Upgrade-GIS > -Oprindelig meddelelse- > Fra: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED]]På vegne af Martin, Christopher > (WSA Telford) > Sendt: 22. september 2000 11:04 > Til: '[EMAIL PROTECTED]' > Emne: MI MB: Creating and Committing tables (Urgent!) > > > I've got some code which takes in some data, does some > calculations and then > produces a host of other tables... > e.g. > > Select NISLID, R_FLOW, RDNAME, FLOW, FLOW / R_FLOW "Stress_All" > from x2010dm_TR > where Flow_Category = 3 > into x2010dm_TR_100plus > Commit Table x2010dm_TR_100plus As > "working\96-10dm\x2010dm_TR_100plus.TAB" > TYPE NATIVE Charset "WindowsLatin1" > > When I run this code, I get an error at the Commit Table line: 'File > "x2101dm_TR_100plus.TAB" does not exist. Unable to create table.' > > Old versions of this table exist but aren't read-only or > anything. However, > I tried deleting them, but still got the same error message... > > Any thoughts? > > > Chris Martin > GIS Consultant > WS Atkins Consultants Ltd > (01952) 201234 > > -- > To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put > "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
RE: MI MB: Creating and Committing tables (Urgent!)
Hi Chris, It's nothing to do with the actual file names having spaces in them (interpreted by Mapinfo as underscores), is it? For example long file name.tab would get opened in MapInfo as long_file_name The other possibility is if there was a table with that name and somehow only some of its component files got deleted (eg no .tab, but .dat and .id files still present). - David Booth Senior GIS Officer Merseyside Information Service > -Original Message- > From: Martin, Christopher (WSA Telford) [SMTP:[EMAIL PROTECTED]] > Sent: 22 September 2000 10:04 > To: '[EMAIL PROTECTED]' > Subject: MI MB: Creating and Committing tables (Urgent!) > > I've got some code which takes in some data, does some calculations and > then > produces a host of other tables... > e.g. > > Select NISLID, R_FLOW, RDNAME, FLOW, FLOW / R_FLOW "Stress_All" > from x2010dm_TR > where Flow_Category = 3 > into x2010dm_TR_100plus > Commit Table x2010dm_TR_100plus As > "working\96-10dm\x2010dm_TR_100plus.TAB" > TYPE NATIVE Charset "WindowsLatin1" > > When I run this code, I get an error at the Commit Table line: 'File > "x2101dm_TR_100plus.TAB" does not exist. Unable to create table.' > > Old versions of this table exist but aren't read-only or anything. > However, > I tried deleting them, but still got the same error message... > > Any thoughts? > > > Chris Martin > GIS Consultant > WS Atkins Consultants Ltd > (01952) 201234 > > -- > To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put > "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
RE: MI MB: Run Command Limitation
There certainly used to be a length limit for the select statement used by ODBC too. - David Booth Senior GIS Officer Merseyside Information Service > -Original Message- > From: Jacques Paris [SMTP:[EMAIL PROTECTED]] > Sent: 21 September 2000 16:18 > To: Mike Taylor; 'Mapinfo List' > Subject: RE: MI MB: Run Command Limitation > > I have written the most sophisticated program of all : > > dim a,b as string > onerror goto crash > a="" > boucle: > a=a+"A" > b="print "+""""+a+"""" > print len(b) > run command b > goto boucle > goto fin > crash: > print "error "+err() > fin: > end program > > and it gets stuck on a command at 508 characters (error 965, expression > too > complex). The run command accepts thus a string of 507characters. That > would > be 512 - 5 (let us assume that it is some code id). > > Aren't they other places in MI where the 512 character limit is imposed? > Don't I remember something of the sort with the "where" clause of the SQL > requester? > > > Jacques PARIS > > e-mail[EMAIL PROTECTED] > For MapInfo support, see the Paris PC Consult enr. site at > http://www.total.net/~rparis/gisproducts.htm > > -Original Message- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED]]On > Behalf Of Mike Taylor > Sent: September 21, 2000 1:04 AM > To: 'Mapinfo List' > Subject: RE: MI MB: Run Command Limitation > > Hi again > > Seems I spat the dummy at the wrong statement. > I changed the string (from select to print) that I was sending to run > command. eg, > From: > qs = "select ... ... from table into anothertable" > run command qs > To: > qs = "print ""select ... ... from table into > anothertable""" > run command qs > > This worked fine, so I will change my question to why is this happening > with > select?? > The amount of characters seems to be variable as well depending on the > expression? > I've attached a program which will generate the problem on my machine. > > > -Original Message- > From: Mike Taylor [mailto:[EMAIL PROTECTED]] > Sent: Thursday, 21 September 2000 15:20 > To: 'Mapinfo List' > Subject: MI MB: Run Command Limitation > > > Hi > > I seem to have run into a size limitation on the string you can pass to > run > command. It works when I trim the string down to 421 characters and fails > (badly, invalid page fault) when it is 422 characters. > The command also fails when I put it into the mapbasic window of > professional. > Is there any workaround for this? > Why is 422 the magic number? > -- > To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put > "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] > > -- > To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put > "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB: Creating and Committing tables (Urgent!)
I've got some code which takes in some data, does some calculations and then produces a host of other tables... e.g. Select NISLID, R_FLOW, RDNAME, FLOW, FLOW / R_FLOW "Stress_All" from x2010dm_TR where Flow_Category = 3 into x2010dm_TR_100plus Commit Table x2010dm_TR_100plus As "working\96-10dm\x2010dm_TR_100plus.TAB" TYPE NATIVE Charset "WindowsLatin1" When I run this code, I get an error at the Commit Table line: 'File "x2101dm_TR_100plus.TAB" does not exist. Unable to create table.' Old versions of this table exist but aren't read-only or anything. However, I tried deleting them, but still got the same error message... Any thoughts? Chris Martin GIS Consultant WS Atkins Consultants Ltd (01952) 201234 -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
RE: MI MB: Run Command Limitation
Hello Jacques, Interestingly, your program stops at 309 on Pro v4.5, suggesting that the limit was raised in latter versions. The limit has never caused me much of a problem. Most tasks can be broken down or redesigned to accommodate the restriction. Regards, Warren Vick Europa Technologies Ltd, U.K. http://www.europa-tech.com > -Original Message- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED]]On Behalf Of Jacques Paris > Sent: Thursday, September 21, 2000 4:18 PM > To: Mike Taylor; 'Mapinfo List' > Subject: RE: MI MB: Run Command Limitation > > > I have written the most sophisticated program of all : > > dim a,b as string > onerror goto crash > a="" > boucle: > a=a+"A" > b="print "+""""+a+"""" > print len(b) > run command b > goto boucle > goto fin > crash: > print "error "+err() > fin: > end program > > and it gets stuck on a command at 508 characters (error 965, > expression too > complex). The run command accepts thus a string of 507characters. > That would > be 512 - 5 (let us assume that it is some code id). > > Aren't they other places in MI where the 512 character limit is imposed? > Don't I remember something of the sort with the "where" clause of the SQL > requester? > > > Jacques PARIS > > e-mail[EMAIL PROTECTED] > For MapInfo support, see the Paris PC Consult enr. site at > http://www.total.net/~rparis/gisproducts.htm > > -Original Message- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED]]On > Behalf Of Mike Taylor > Sent: September 21, 2000 1:04 AM > To: 'Mapinfo List' > Subject: RE: MI MB: Run Command Limitation > > Hi again > > Seems I spat the dummy at the wrong statement. > I changed the string (from select to print) that I was sending to run > command. eg, > From: > qs = "select ... ... from table into anothertable" > run command qs > To: > qs = "print ""select ... ... from table into > anothertable""" > run command qs > > This worked fine, so I will change my question to why is this > happening with > select?? > The amount of characters seems to be variable as well depending on the > expression? > I've attached a program which will generate the problem on my machine. > > > -Original Message- > From: Mike Taylor [mailto:[EMAIL PROTECTED]] > Sent: Thursday, 21 September 2000 15:20 > To: 'Mapinfo List' > Subject: MI MB: Run Command Limitation > > > Hi > > I seem to have run into a size limitation on the string you can > pass to run > command. It works when I trim the string down to 421 characters and fails > (badly, invalid page fault) when it is 422 characters. > The command also fails when I put it into the mapbasic window of > professional. > Is there any workaround for this? > Why is 422 the magic number? > -- > To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put > "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] > > -- > To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put > "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] > -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
RE: MI MB: Run Command Limitation
I have written the most sophisticated program of all : dim a,b as string onerror goto crash a="" boucle: a=a+"A" b="print "+""""+a+"""" print len(b) run command b goto boucle goto fin crash: print "error "+err() fin: end program and it gets stuck on a command at 508 characters (error 965, expression too complex). The run command accepts thus a string of 507characters. That would be 512 - 5 (let us assume that it is some code id). Aren't they other places in MI where the 512 character limit is imposed? Don't I remember something of the sort with the "where" clause of the SQL requester? Jacques PARIS e-mail[EMAIL PROTECTED] For MapInfo support, see the Paris PC Consult enr. site at http://www.total.net/~rparis/gisproducts.htm -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of Mike Taylor Sent: September 21, 2000 1:04 AM To: 'Mapinfo List' Subject: RE: MI MB: Run Command Limitation Hi again Seems I spat the dummy at the wrong statement. I changed the string (from select to print) that I was sending to run command. eg, From: qs = "select ... ... from table into anothertable" run command qs To: qs = "print ""select ... ... from table into anothertable""" run command qs This worked fine, so I will change my question to why is this happening with select?? The amount of characters seems to be variable as well depending on the expression? I've attached a program which will generate the problem on my machine. -Original Message- From: Mike Taylor [mailto:[EMAIL PROTECTED]] Sent: Thursday, 21 September 2000 15:20 To: 'Mapinfo List' Subject: MI MB: Run Command Limitation Hi I seem to have run into a size limitation on the string you can pass to run command. It works when I trim the string down to 421 characters and fails (badly, invalid page fault) when it is 422 characters. The command also fails when I put it into the mapbasic window of professional. Is there any workaround for this? Why is 422 the magic number? -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
RE: MI MB: Run Command Limitation
Hi again Seems I spat the dummy at the wrong statement. I changed the string (from select to print) that I was sending to run command. eg, From: qs = "select ... ... from table into anothertable" run command qs To: qs = "print ""select ... ... from table into anothertable""" run command qs This worked fine, so I will change my question to why is this happening with select?? The amount of characters seems to be variable as well depending on the expression? I've attached a program which will generate the problem on my machine. -Original Message- From: Mike Taylor [mailto:[EMAIL PROTECTED]] Sent: Thursday, 21 September 2000 15:20 To: 'Mapinfo List' Subject: MI MB: Run Command Limitation Hi I seem to have run into a size limitation on the string you can pass to run command. It works when I trim the string down to 421 characters and fails (badly, invalid page fault) when it is 422 characters. The command also fails when I put it into the mapbasic window of professional. Is there any workaround for this? Why is 422 the magic number? -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB: Run Command Limitation
Hi I seem to have run into a size limitation on the string you can pass to run command. It works when I trim the string down to 421 characters and fails (badly, invalid page fault) when it is 422 characters. The command also fails when I put it into the mapbasic window of professional. Is there any workaround for this? Why is 422 the magic number? Mike Taylor Terralink Limited Phone 64-04-915 6000 Fax 64-04-915 6030 mailto:[EMAIL PROTECTED] http://www.terralinkltd.com -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB/WinAPI to find last opened file/folder
G'day, Is there a way w/ MB or WinAPI to determine the last opened file or just the folder? In MI Professional, when one opens a new tab, it defaults to the folder of the last opened tab. How is this stored? Even if no .wor is open or saved the same folder is pointed to. When one runs a desktop mbx w/ a new instance of MIProfessional, how can the last folder used be accessed? Appreciate any tips. John Chioles Network Operations Metricom, http://www.metricom.com office: 281-873-3443 mobile: 281-433-9325 -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
Re: MI MB: How to extend a line using MapBasic
Hello All, In response to Michelle...If all the little quirks don't kick you the math sure will. Here's a great site I found a long while back about "Greate Circle" calcs. It's geared to aviation but the formulas are all there. It can at least make a contribution to the "porcelein reading room". Trey Pattillo [EMAIL PROTECTED] http://www.wap3.com -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
Re: MI MB: How to extend a line using MapBasic
Thanks to all who answered my previous postings - I've got the PLINE conversion working beautifully & I'm wading through the hideous maths that Trey sent me. (Thanks Trey - exactly what I was after!). Thanks in particular to those who sent code - it's amazing what you pick up from seeing other peoples logic/code. *Michelle SmithTechnical ManagerFrontier Mapping Pty Ltd**
RE: MI MB: How do I convert PLINE into LINE?
Michelle, You can make the pline editable, select all segments that you want combined into a line, then select Objects>Combine. Note that many records will become one record, so if the attributes differed for each line segment, you will lose all but one. But if all the attributes are the same, just keep the first value... Hope this helps, Erin Rubio Spatial Insights, Inc. A Geographic Information Services Company 8221 Old Courthouse Road Suite 203 Vienna, VA 22182 Tel: 703-827-7034 Fax: 703-827-7037 Sales: 800-347-5291 [EMAIL PROTECTED] www.spatialinsights.com -Original Message-From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of [EMAIL PROTECTED]Sent: Monday, September 18, 2000 2:01 AMTo: MapInfo Discussion GroupSubject: MI MB: How do I convert PLINE into LINE? Hi, We collect data using GPS, so a single line (e.g. a vineyard row) is composed of (for example) 10 nodes at the start of the line and 10 nodes at the end of the line. (every second measurement we make is converted into a node). Now, I want to average the 10 nodes at the start and end of the line & then convert it from a polyline into a line. Any suggestions as to how to go about this? I don't want to generate a new line in exactly the same position as I'll then lose all the attribute data that was also collected with that line. *Michelle SmithTechnical ManagerFrontier Mapping Pty Ltd**
MI MB: How do I convert PLINE into LINE?
Hi, We collect data using GPS, so a single line (e.g. a vineyard row) is composed of (for example) 10 nodes at the start of the line and 10 nodes at the end of the line. (every second measurement we make is converted into a node). Now, I want to average the 10 nodes at the start and end of the line & then convert it from a polyline into a line. Any suggestions as to how to go about this? I don't want to generate a new line in exactly the same position as I'll then lose all the attribute data that was also collected with that line. *Michelle SmithTechnical ManagerFrontier Mapping Pty Ltd**
MI MB: How to extend a line using MapBasic
On a similar theme to my previous posting, how would I extend a line in MapBasic - (similar to the functionality in MapInfo that allows you to double click on a line and change the length of the line). Obviously, the line has to remain in the same position, and extend along the same bearing by an equal distance. My mind won't twist any further around either of these problems! *Michelle SmithTechnical ManagerFrontier Mapping Pty Ltd**
MI mi/mb accessing Universal Translator via MB?
Hi Can anyone tell me whether its possible to access Universal Translator via MB. It would appear that I can only give my users the options available under EXPORT (mif/dxf). Thanks Ian Allan -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
Re: MI MB s(t)imulation of info
- Original Message - From: "Jacques Paris" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Thursday, September 14, 2000 3:20 PM Subject: MI MB s(t)imulation of info > Does anyone know how to s(t)imulate the info tool from within MapBasic? > > That should be done with only the x and y of a point rather than using the > tool and clicking on that point. In your code, you can use Searchpoint() and SearchInfo() to select a table and a record to display; you can then use Set Window WIN_INFO table -table-name- Record -record-no- to display that record. -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB s(t)imulation of info
Does anyone know how to s(t)imulate the info tool from within MapBasic? That should be done with only the x and y of a point rather than using the tool and clicking on that point. Thanks, Jacques PARIS e-mail[EMAIL PROTECTED] For MapInfo support, see the Paris PC Consult enr. site at http://www.total.net/~rparis/gisproducts.htm -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
RE: MI MB reading binary data
You might be able to use the unix command dd with the argument conv=swab to byte-swap the file before copying to NT - it used to work with Landsat data off reel to reel tapes read by HP-UX about ten years ago! - David Booth Senior GIS Officer Merseyside Information Service > -Original Message- > From: [EMAIL PROTECTED] [SMTP:[EMAIL PROTECTED]] > Sent: 13 September 2000 19:26 > To: [EMAIL PROTECTED] > Subject: MI MB reading binary data > > Mappers, > Using mb code, under NT, I'm trying to read binary data that was created > on a UNIX machine which writes the data most significant byte first. My > mb code wants to read binary data as least significant byte first. Anyone > know how to work around this short of writing a byte exchanger? Does > MapBasic have a patch or something available? > Thanks, > SI > -- > To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put > "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
Re: MI MB reading binary data
In MB, when you read/write a input file, you can specify the byteorder by saying high or low. THis way you can control the oder of bytes while reading. -- Rajeev Saraf [EMAIL PROTECTED] wrote: > Mappers, > Using mb code, under NT, I'm trying to read binary data that was created on a UNIX >machine which writes the data most significant byte first. My mb code wants to read >binary data as least significant byte first. Anyone know how to work around this >short of writing a byte exchanger? Does MapBasic have a patch or something available? > Thanks, > SI > -- > To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put > "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB reading binary data
Mappers, Using mb code, under NT, I'm trying to read binary data that was created on a UNIX machine which writes the data most significant byte first. My mb code wants to read binary data as least significant byte first. Anyone know how to work around this short of writing a byte exchanger? Does MapBasic have a patch or something available? Thanks, SI -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
RE: MI MB: VB6 DLL Access from MB
Hi, Creating DLL and using them from MB is a big wish from many MB developers. Unfortunately, as Richard writes, VB created COM DLLs that can't be used from MB. But there is a tool made by Desaware that might do the trick anyway. The tools is called SpyWorks and it creates a alias DLL that can retrieve the addresses for the wanted functions in the VB DLL. I have tried it in a simple way and I have got a hole through to a VB DLL, but only with a simple function, nothing fancy as large use defines dialogs, but this ought to be possible as well. Is there anyone else out there who has good experience with this tool ? Best regards, Peter *** * Peter Moller[EMAIL PROTECTED] GIS-Developer Direct: +45 6313 5008 KampsaxVoice: +45 6313 5013 Rugaardsvej 55 Faximile: +45 6313 5090 DK 5000 Odense CWeb: www.mapinfo.dk MapInfo Authorized Partner *** * -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
RE: MI MB: VB6 DLL Access from MB
Good Day all, Can someone tell me how to print a map in a larger context? I can print the layout shown on my screen, but I would like to print the map at 320 mile zoom on 36"x24" paper. Is this possible? I'm in Toronto, Ontario, Canada. Any help in this matter would be greatly appreciated. Angela Mashford-Pringle Health Canada -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
RE: MI MB: VB6 DLL Access from MB
Eric, Unfortunately you can't do it. VB only creates COM DLLs and since MapBasic does not support COM, VB created DLLs cannot be used from MapBasic. Richard Burkmar -Original Message- From: Eric Maranne [mailto:[EMAIL PROTECTED]] Sent: 11 September 2000 11:58 To: [EMAIL PROTECTED] Subject: MI MB: VB6 DLL Access from MB Could someone point me to a working example of : how to access a VB DLL from a MB program ? (as well as any indication regarding VB compile flags settings ?) It's possible from VC++ or Delphi, but I need to do it from a VB6 DLL, and I'm stuck ... any workaround appreciated (but I don't want to embed OLE in VB, got to stay in MI and call VB functions ) TIA Eric. -Message d'origine- De: Dany Bouchard [SMTP:[EMAIL PROTECTED]] Date: mardi 5 septembre 2000 19:24 A: [EMAIL PROTECTED] Objet: MI AD: SVGExport.MBX - Export your maps to SVG from MapInfo ! Dear listers, For those interested in Scalable Vector Graphics (SVG), a new MapBasic program called SVGExport.MBX that exports MapInfo maps to SVG is available from DBx Geomatics at http://www.dbxgeomatics.com/SVGExport.htm. Please use the download link from that page to download the MBX and documentation. SVG provides an interesting and low cost approach to publish maps on the internet and also allows quite sophisticated output and interactivity (animation, etc !). For anyone interested in getting an introduction on mapping with SVG you are also welcomed to visit DBx Geomatics SVG Technology Preview Area which is no longer password protected at: http://www.dbxgeomatics.com/svg.asp Also an interesting article about XML and GIS from giscafe.com: (http://www.giscafe.com/GISVision/Review/XML.html) - SVG EXPORT UTILITY VERSION 1.0.5 - Summary of features and functionality - * Reads MapInfo map windows and exports content to SVG (same size as the map) * All MapInfo object types and projections are supported * Labels and cosmetic layer are supported * The style of MapInfo objects (and style override) is kept (as much as possible) in the resulting file * Options available for filters (shadows, glow, bevel, etc) and opacity settings * Options available to specify color gradients for regions and text * Interactivity options available to specify hyperlinks, tooltips or color rollover * Option for generating an html container with a layer control * Option to export to compressed SVG - Requirements: MapInfo Version 5.x or later Your comments are welcomed ! Dany Bouchard DBx Geomatics 38 de l'Orbite Hull, Quebec Canada J9A 3C7 Telephone/Telephone: 819.743.3870 Telecopieur/Fax: 819.775.3264 Courrier electronique/Email: [EMAIL PROTECTED] Page Web/Web site: http://www.dbxgeomatics.com/home.asp Vitrine technologique SVG / SVG Technology Preview: http://www.dbxgeomatics.com/svg.asp << Fichier: ATT2.html>> --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.185 / Virus Database: 88 - Release Date: 18/08/00 -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB: VB6 DLL Access from MB
Could someone point me to a working example of : how to access a VB DLL from a MB program ? (as well as any indication regarding VB compile flags settings ?) It's possible from VC++ or Delphi, but I need to do it from a VB6 DLL, and I'm stuck ... any workaround appreciated (but I don't want to embed OLE in VB, got to stay in MI and call VB functions ) TIA Eric. -Message d'origine- De: Dany Bouchard [SMTP:[EMAIL PROTECTED]] Date: mardi 5 septembre 2000 19:24 A: [EMAIL PROTECTED] Objet: MI AD: SVGExport.MBX - Export your maps to SVG from MapInfo ! Dear listers, For those interested in Scalable Vector Graphics (SVG), a new MapBasic program called SVGExport.MBX that exports MapInfo maps to SVG is available from DBx Geomatics at http://www.dbxgeomatics.com/SVGExport.htm. Please use the download link from that page to download the MBX and documentation. SVG provides an interesting and low cost approach to publish maps on the internet and also allows quite sophisticated output and interactivity (animation, etc !). For anyone interested in getting an introduction on mapping with SVG you are also welcomed to visit DBx Geomatics SVG Technology Preview Area which is no longer password protected at: http://www.dbxgeomatics.com/svg.asp Also an interesting article about XML and GIS from giscafe.com: (http://www.giscafe.com/GISVision/Review/XML.html) - SVG EXPORT UTILITY VERSION 1.0.5 - Summary of features and functionality - * Reads MapInfo map windows and exports content to SVG (same size as the map) * All MapInfo object types and projections are supported * Labels and cosmetic layer are supported * The style of MapInfo objects (and style override) is kept (as much as possible) in the resulting file * Options available for filters (shadows, glow, bevel, etc) and opacity settings * Options available to specify color gradients for regions and text * Interactivity options available to specify hyperlinks, tooltips or color rollover * Option for generating an html container with a layer control * Option to export to compressed SVG - Requirements: MapInfo Version 5.x or later Your comments are welcomed ! Dany Bouchard DBx Geomatics 38 de l'Orbite Hull, Quebec Canada J9A 3C7 Telephone/Telephone: 819.743.3870 Telecopieur/Fax: 819.775.3264 Courrier electronique/Email: [EMAIL PROTECTED] Page Web/Web site: http://www.dbxgeomatics.com/home.asp Vitrine technologique SVG / SVG Technology Preview: http://www.dbxgeomatics.com/svg.asp << Fichier: ATT2.html>> --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.185 / Virus Database: 88 - Release Date: 18/08/00 -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB: edits pending error
Hi, I'm trying to save a SQL query between a native MapInfo table and a registered xls table. But when I do, I get an error message saying "No edits pending for table...". Here's the code: *** Register table Applicationdirectory$()+"test_join_co_wc.xls" Type XLS Titles Range "Sheet1!A2:CU1398" Into Applicationdirectory$()+"test_join_co_wc.tab" open table applicationdirectory$()+"test_join_co_wc.tab" As BDdescriptive_CO 'commit table BDdescriptive_CO as BDdescriptive_CO_MI 'close table BDdescriptive_CO 'open table BDdescriptive_CO_MI SELECT * FROM Wirecenter,BDdescriptive_CO WHEREWirecenter.sucal = BDdescriptive_CO.clli INTO CO_WC_joint commit table CO_WC_joint *** I tried it through MapInfo and encoutered no problem in saving the query. I checked and there is a CO_WC_joint table created following the query, but then I'm not able to save it with MapBasic. Another thing: If I try to issue the command "commit table BDdescriptive_CO as BDdescriptive_CO_MI" (when it's not a comment), I get an error message saying that "variable or field BDdescriptive_CO_MI is not defined". But it's not a variable, it's the name under which I want to save the table! Those are very simple commands, but something's wrong and I couldn't grasp it. Help me please! Thanks, Jeff Lepine [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB language history
I have just finished compiling a history of the changes in the MapBasic language since the initial Windows 3.0 up to and including 6.0. I have put it in the form of a pdf document of slightly over 150K. It is certainly not a document that could become a substitute to an official publication but it offers hints about when changes were introduced in the language and what they involved. As there is no official publication about that subject, there is plenty of room for lacking precise information, for relying on various kinds of documents, for calling on personal experience. My hope is that we could through a collective effort constitute a solid basis on the subject and I am offering that document as a starting block. E-mail me if you are interested and feed me with more, better info to improve the document. Thanks in advance. Jacques PARIS e-mail[EMAIL PROTECTED] For MapInfo support, see the Paris PC Consult enr. site at http://www.total.net/~rparis/gisproducts.htm -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB language history
I have just finished compiling a history of the changes in the MapBasic language since the initial Windows 3.0 up to and including 6.0. I have put it in the form of a pdf document of slightly over 150K. It is certainly not a document that could become a substitute to an official publication but it offers hints about when changes were introduced in the language and what they involved. As there is no official publication about that subject, there is plenty of room for lacking precise information, for relying on various kinds of documents, for calling on personal experience. My hope is that we could through a collective effort constitute a solid basis on the subject and I am offering that document as a starting block. E-mail me if you are interested and feed me with more, better info to improve the document. Thanks in advance. Jacques PARIS e-mail[EMAIL PROTECTED] For MapInfo support, see the Paris PC Consult enr. site at http://www.total.net/~rparis/gisproducts.htm -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB : list of MB reserved words or parser ?
Hello everybody, After so longtime spent on other programing tools, I'm back in the MapBasic world :-! Just purchased MB6, launched it, and I did feel at home ... no much changes in the editor since ver 1.1 !!! I feel I just can't cope with that anymore ... Could someone provide me with a list of reserved words (apart from the ones in .defs given with MB) ? or a parser file, so that I could at least get this incredible improvement of a coloured syntax highlighting ? (without writing down all MB syntax from the manuals ?) TIA Have a nice Day Eric --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.185 / Virus Database: 88 - Release Date: 18/08/00 -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI/MB default 'dialog' font
Hi Can anyone tell me if there is a way to change the default font used in dialog boxes to be courier. I'm trying to get columns of text to align in mapbasic, but in the absense of courier, this seems as though it will be impossible. Thanks Ian Allan -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI-MB: How to create a 'layer control' like dialog
Hi I've been trying to work out how the MapInfo 'Layer Control' dialog box would be created in MapBasic. It is quite obviously a MultiListBox with CheckBoxes within it. This is the exact functionality I need. I have created my own dialog with identical functionality (customised to my application), but i'm embarassed to say that it has taken around a thousand lines of code to do. As you can well imagine, i dread this program every time it needs to be maintained. Rewriting this now is going to save me much pain in the future. please help me Ian Allan -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
Re: MI MB strange bug
Doug, Yes, I have seen this problem as well in the past. And yes, it is most annoying. I did'nt spend a lot of time back then trying to figure it out - just deleted the white space as you did. If I ever see this problem again I will take a look at non printable characters etc. in an editor to see if there is stuff that has been copied etc. that the compiler doesn't like. Good luck, Carol Sheehan -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB strange bug
Hi all, I have come across what is a really annoying, frustrating and weird bug in my MapBasic compiler. I have found that when I copy code from other unformatted text (ASCII) documents and paste it into MB and then compile it, it almost inevitably comes up with numerous compiling errors. I have discovered that if I painstakingly go through the code and delete all white space and then reinsert it, compiling will be successful. Has anyone else experienced this problem I am using MapBasic 6. Doug Pease GISO Livingstone Shire council P.O. Box 600 YEPPOON 4703 Ph 49399957 -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI/MB paper units definition scope
I was wandering if my understanding of the scope of the definition of "paper units" is correct. It seems to be limited to the "immediate environment of use", i.e. a mbx or the Mbwindow. There does not seem to be any "communication" between environments. If you change the units in the Mbwindow, any read in a program will be in inches, or in the unit specified in that program if specified previously to the read. If I am right, the "current unit paper" is always "in" if it has not been changed previously in the specific environment, and for a MBX, the programmer should know what is happening. As far as the Mbwindow is concerned, as a function cannot be used, an empirical way to do it is to issue a "print windowinfo(1002,4)" (the width of the window) then "set paper units "in" " followed by a rerun of the print, and repeat with each unit type until one gets back the same value as the first one. I would appreciate confirmation of my understandingof that question. Thanks Jacques Jacques PARIS e-mail[EMAIL PROTECTED] For MapInfo support, see the Paris PC Consult enr. site at http://www.total.net/~rparis/gisproducts.htm -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB: Essential Tool for Coordinate System, Lost Info and MSG window etc
Hello everybody, I've bored from opening Mapbasic window and writing "set map coordsys window frontwindow()" and Loosing Info/Mesage Window i write a utility and want to share with you, Add this utilility to your startup.wor under Mapinfo installation directory as Run application "c:\program files\mapinfo\professional\tools\mytools.mbx" it adds 4 sub menu under "Options" menu of MI Pro anyone who has not got MapBasic, I can send the MBX, Also i'm wating for contribution for other essential functions... Best Regards... Ahmet DABANLI Here is the code copy/paste and Compile the code it is actully as simple as MI programmers cannot give time to add to the menu or include in MI Pro ... include "mapbasic.def" declare sub main declare sub ShowInfoWin declare sub SetCoordSys declare sub ShowMBWin declare sub ShowMsgWin sub main Alter menu id 5 add "(-" Alter menu id 5 add "Set Coordinate System" calling SetCoordSys Alter menu id 5 add "Find In&fo Window" calling ShowInfoWin Alter menu id 5 add "Find M&essage Window" calling ShowMsgWin Alter menu id 5 add "Fin&d Mapbasic Window" calling ShowMBWin End sub sub ShowInfoWin set window 1008 position (1,1) show End sub sub SetCoordSys if numwindows() then if windowinfo(frontwindow(),3) = WIN_MAPPER then set map coordsys window frontwindow() end if end if End sub sub ShowMBWin set window 1002 position (1,3) show End sub sub ShowMsgWin set window 1003 position (3,2) show End sub
MI MB : reshaped object
>From a MB application, I grab a selected object (o1=selection.obj) that is reshaped and to it is added one node (using run menu commands 1601 and 1723). I would like to put the modified object into o2. If I do o2=selection.obj (the modified object appearing to be selected) I get anything but o1 with a new node. Any idea? TIA Jacques PARIS e-mail[EMAIL PROTECTED] For MapInfo support, see the Paris PC Consult enr. site at http://www.total.net/~rparis/gisproducts.htm -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB help file. Closure
Thanks to those who answered me already. I am now "equipped" with these two files. I forgot to mention that as I am a MI/MB licensee since version 2 for Dos, I did see any copyright infringement in my request. Jacques Jacques PARIS e-mail[EMAIL PROTECTED] For MapInfo support, see the Paris PC Consult enr. site at http://www.total.net/~rparis/gisproducts.htm -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of Jacques Paris Sent: August 12, 2000 8:32 AM To: [EMAIL PROTECTED] Subject: MI MB help file In order to complete my library of historical documents, I am looking for the version 3.0 and 4.0 MapBasic help files, If anyone is willing to "help" me with that, contact me please before e-mailing the file; I don't want to crowd the net and my server with many attachments. Thanks In advance. Jacques Jacques PARIS e-mail[EMAIL PROTECTED] For MapInfo support, see the Paris PC Consult enr. site at http://www.total.net/~rparis/gisproducts.htm -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB help file
In order to complete my library of historical documents, I am looking for the version 3.0 and 4.0 MapBasic help files, If anyone is willing to "help" me with that, contact me please before e-mailing the file; I don't want to crowd the net and my server with many attachments. Thanks In advance. Jacques Jacques PARIS e-mail[EMAIL PROTECTED] For MapInfo support, see the Paris PC Consult enr. site at http://www.total.net/~rparis/gisproducts.htm -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
Re: MI MB getting info on default printer
The Windoze API does everything, if you can find it and figure it out It's all based on C++ structures, but can be ported to MB, the most common difference being in numbers C++ LONG MB Integer The following code below will return the default printer. Getting the installed list is called ENUM_PRINTERS and is somewhat more complex and then you have Win9X and NT differences. A work around for enum would be to read the windoze profile using GetSectionValues and then parsing the returned string. Declare Function GetProfileString Lib "kernel32" Alias "GetProfileStringA" ( ByVal lpSectionName As String, ByVal lpKeyName As String, ByVal lpDefault As String, lpReturnedString As String, ByVal nSize As Integer) As Integer ' RETURNS number of characters read DIM sSize AS INTEGERDIM PrnInfo AS STRING x=512 '' initialize size for return stringPrnInfo=string$(sSize," ") '' initialize place for return string x=GetProfileString("windows","device","No Printer Installed",PrnInfo,sSize) print "Name,Spooler,Port"print PrnInfo Trey Pattillo[EMAIL PROTECTED]http://www.wap3.com - Original Message - From: Doug Pease To: '[EMAIL PROTECTED]' Sent: Wednesday, 02 August, 2000 01:57 Subject: MI MB getting info on default printer MB / MI gurus,I am writing a mapbasic application which will need to find out which one ofa number of networked printers is the default on the machine it is being runfrom. Does any one have a function which accesses a Windows library file toget this info, that they might be able to share with me? Any assistance would be much appreciated. Thanks in advance. Doug PeaseGISOLivingstone Shire councilP.O. Box 600YEPPOON 4703Ph 49399957--To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put"unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB string syntax for right justify
Dear everyone, in an existing table is there a simple way to right justify numerical values in a longitude column already populated with values defined as float? i want to parse the data values starting from the left and i want the spaces to be recogized when i count over using left string and mid string functions in table>update column or the mapbasic window. can spaces or null values be recognized when counting? thankyou, jeff Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB getting info on default printer
MB / MI gurus, I am writing a mapbasic application which will need to find out which one of a number of networked printers is the default on the machine it is being run from. Does any one have a function which accesses a Windows library file to get this info, that they might be able to share with me? Any assistance would be much appreciated. Thanks in advance. Doug Pease GISO Livingstone Shire council P.O. Box 600 YEPPOON 4703 Ph 49399957 -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB compiling error problem
Thanks to Dion Duran, Bill Wemple and any others who pursued my problem of the bug with the new Set Window Printer statement. As Bill pointed out it is necessary to use a command string to get this statement to work. I found that the entire statement needs to be run as an alias command for it to work successfully in a variety of cases. The statement seemed to have a problem recognising the Printer Name sometimes if it was included in the Set Window statement. My example is shown below: Sub donext CLS FW = FrontWindow() prnta = """\\NT1\LPS17_PS_1""" prntb = """\\NT1\HP1055CM by HP""" pprA4p = "PaperSize 9" 'A4 pprA3p = "PaperSize 269"'A3 portrait pprA2p = "PaperSize 270"'A2 portrait pprA1p = "PaperSize 271"'A1 portrait pprA0p = "PaperSize 272"'A0 portrait If CommandInfo(CMD_INFO_MENUITEM) = 5000 THEN 'A4 portrait >>> sCmd = "Set Window " + FW + " Printer Name " + prnta + " Orientation Portrait Copies 1 " + pprA4p >>> Run Command sCmd Alter MapInfoDialog 1742 Control 1056 Value 1 Run Menu Command 111 .. etc Doug Pease GISO Livingstone Shire council P.O. Box 600 YEPPOON 4703 Ph 49399957 -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
RE: MI MB compiling error problem
Here's a couple workaround examples that were given to this problem. Regards, -Bill include "mapbasic.def" include "menu.def" include "PaperSize.def" Declare Sub Main Declare Sub SetPaperSize Sub Main Call SetPaperSize End Sub Sub SetPaperSize Dim sCmd as String Dim iWin as integer iWin = FrontWindow() 'EITHER OF THESE WILL WORK - ONE USES THE DEFINE ALIAS THE OTHER DOES NOT sCmd = "Set Window Frontwindow() Printer Papersize 9" 'sCmd = "Set Window Frontwindow() Printer Papersize " + DMPAPER_A4 Run Command sCmd Note WindowInfo(frontwindow(), WIN_INFO_PRINTER_PAPERSIZE) End Sub Conclusion: Mail List:owner-mapinfo-l From:Dion Duran <[EMAIL PROTECTED]> on 07/30/2000 05:44 PM MST To: "'Doug Pease'" <[EMAIL PROTECTED]> cc: "'[EMAIL PROTECTED]'" <[EMAIL PROTECTED]> Subject: (Document link: MapInfo -L and Co.)RE: MI MB compiling error problem This the reply I got when I ask tech support. "This is bug# 14223 in MapInfo 6.0." They didn't give me anymore than that on when it can be fixed. Dion Duran Metricon, Inc. GIS/OPS Systems Analyst [EMAIL PROTECTED] -----Original Message- From: Doug Pease [mailto:[EMAIL PROTECTED]] Sent: Sunday, July 30, 2000 6:03 PM To: '[EMAIL PROTECTED]' Subject: MI MB compiling error problem List Gurus I am trying to create an application using the new Set Window Printer statement in MB 6 When I compile my application with the following statement Set Window FW Printer Name "\\NT1\HP1055CM by HP" Orientation Portrait Copies 1 PaperSize 9(or any other number) I get a System Error message window stating "Internal Error 34623" then MB just closes down. Now, if I compile it without including PaperSize it is successful. Is this a bug or can someone shed some light on this for me. Thanks Doug Pease GISO Livingstone Shire council P.O. Box 600 YEPPOON 4703 Ph 49399957 -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB compiling error problem - when fixed!
Well, if this is bug no: 14,223 - that's way down the list - looks like bit of a wait before it is fixed ;) doug -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of Dion Duran Sent: 31 July 2000 01:45 To: 'Doug Pease' Cc: '[EMAIL PROTECTED]' Subject: RE: MI MB compiling error problem This the reply I got when I ask tech support. "This is bug# 14223 in MapInfo 6.0." They didn't give me anymore than that on when it can be fixed. Dion Duran Metricon, Inc. GIS/OPS Systems Analyst [EMAIL PROTECTED] -Original Message- From: Doug Pease [mailto:[EMAIL PROTECTED]] Sent: Sunday, July 30, 2000 6:03 PM To: '[EMAIL PROTECTED]' Subject: MI MB compiling error problem List Gurus I am trying to create an application using the new Set Window Printer statement in MB 6 When I compile my application with the following statement Set Window FW Printer Name "\\NT1\HP1055CM by HP" Orientation Portrait Copies 1 PaperSize 9(or any other number) I get a System Error message window stating "Internal Error 34623" then MB just closes down. Now, if I compile it without including PaperSize it is successful. Is this a bug or can someone shed some light on this for me. Thanks Doug Pease GISO Livingstone Shire council P.O. Box 600 YEPPOON 4703 Ph 49399957 -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
RE: MI MB compiling error problem
This the reply I got when I ask tech support. "This is bug# 14223 in MapInfo 6.0." They didn't give me anymore than that on when it can be fixed. Dion Duran Metricon, Inc. GIS/OPS Systems Analyst [EMAIL PROTECTED] -Original Message- From: Doug Pease [mailto:[EMAIL PROTECTED]] Sent: Sunday, July 30, 2000 6:03 PM To: '[EMAIL PROTECTED]' Subject: MI MB compiling error problem List Gurus I am trying to create an application using the new Set Window Printer statement in MB 6 When I compile my application with the following statement Set Window FW Printer Name "\\NT1\HP1055CM by HP" Orientation Portrait Copies 1 PaperSize 9(or any other number) I get a System Error message window stating "Internal Error 34623" then MB just closes down. Now, if I compile it without including PaperSize it is successful. Is this a bug or can someone shed some light on this for me. Thanks Doug Pease GISO Livingstone Shire council P.O. Box 600 YEPPOON 4703 Ph 49399957 -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB compiling error problem
List Gurus I am trying to create an application using the new Set Window Printer statement in MB 6 When I compile my application with the following statement Set Window FW Printer Name "\\NT1\HP1055CM by HP" Orientation Portrait Copies 1 PaperSize 9(or any other number) I get a System Error message window stating "Internal Error 34623" then MB just closes down. Now, if I compile it without including PaperSize it is successful. Is this a bug or can someone shed some light on this for me. Thanks Doug Pease GISO Livingstone Shire council P.O. Box 600 YEPPOON 4703 Ph 49399957 -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
Re: MI MB Select using string variable
Hi Bill, Try this syntax instead: I take it that Population and MyTable is the real names for the table and the column and not variables/constants containing the real names. *** * Dim MySQL as String '1. If Population contains numbers: MySQL = "Population > 1" '2. If Population contains strings: MySQL = "Population > " + Chr$(34) + "1" + Chr$(34) If MyTable is the actual name of the table: Run Command "Select * from MyTable Where " + MySQL *** * Hope this will help you on! Best regards, Peter *** * Peter Moller[EMAIL PROTECTED] GIS-Developer Direct: +45 6313 5008 KampsaxVoice: +45 6313 5013 Rugaardsvej 55 Faximile: +45 6313 5090 DK 5000 Odense CWeb: www.mapinfo.dk MapInfo Authorized Partner *** * -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB Select using string variable
This may be simple but I can't get MB 6 ( using MI 5.5) to act on the following Dim MySQL as String MySQL = "Population > 1" Select * from MyTable Where MySQL No errors - it just does not resolve MySQL and the 'where' is ignored I CAN put an integer variable in place of 1 Dim MyVal as integer MyVal = 10 Select * from MyTable where population > MyVal but not for the whole 'where' string. Now if I wanted to say change> to =how would I do it ? Is this a limitation or am I missing something? Thanks Bill -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI/MB SUM MBX install routine
Hi I recently posted a request for a technique to install my mapbasic routine & associated tables. The replies can be summarised as falling into three categories... 1. Use WinZip 2. Use installation software such as InstallShield or other available freeware 3. Write a DOS batch routine. I investigated each of these. I think that in the long term I will purchase InstallShield (or some such program). I believe this to be the most professional approach. However, due to time constraints as much as anything, in the short term I was keen to keep the learning curve as low as possible & work with something I understood. So I wrote a DOS batch routine called from a MapBasic program. I have included this below for anyone who is interested. If anyone can suggest a simple way to determine "available drives" (rather than c to z), I would be grateful. Thanks to the many who responded. Ian Allan = Include "MapBasic.Def" Declare Sub Main Declare Sub ExitInstall ' Sub Main ' Dim sCdDrive,sPossibleDrives,sSelectedDrive,sCommand1,sCommand2,sCommand3 As String Dim i,siSelectedDrive As SmallInt sCdDrive = Left$(ApplicationDirectory$(),2) sPossibleDrives = "" For i = 67 to 90 If i <> Asc(Left$(ApplicationDirectory$(),1)) Then 'Prohibit install onto the source drive sPossibleDrives = sPossibleDrives+" "+ Chr$(i)+";" End If Next Dialog Title "Choose Installation Drive" Width 125 Height 25 Control PopupmenuPosition 10,5 Title sPossibleDrives Id 1 Into siSelectedDrive Control CancelButton Position 45,5 Width 30 height 12 Calling ExitInstall Control OKButton Position 85,5 Width 30 height 12 Title "Install" siSelectedDrive = siSelectedDrive+66 'Asci # for C drive (66+1=67) If siSelectedDrive > Asc(Left$(ApplicationDirectory$(),1)) or siSelectedDrive = Asc(Left$(ApplicationDirectory$(),1)) then siSelectedDrive=siSelectedDrive+1 'Prohibit install onto the source drive If Asc(Left$(ApplicationDirectory$(),1)) < 67 then siSelectedDrive=siSelectedDrive-1 'Caters for 'A' drive test End If End If sSelectedDrive=Chr$(siSelectedDrive) ' "SourceDirectory" assumes that your CD is setup with the same paths as you want to install ' You should change "SourceDirectory" to that of your directory name sCommand1 = "Command.com /c Md "+sSelectedDrive+":\SourceDirectory" Run Program sCommand1 sCommand2 = "Command.com /c Xcopy "+sCdDrive+"\SourceDirectory "+sSelectedDrive+":\SourceDirectory /s /e" Run Program sCommand2 sCommand3 = "Command.com /c Attrib -r "+sSelectedDrive+":\SourceDirectory /s" Run Program sCommand3 Note "Installation"+Chr$(10)+"Complete." End Sub ' Sub ExitInstall ' End Sub -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB upgrade??
I currently use MapBasic version 4.1 We have just upgraded MI to 6.0 Are there enough enhancements in MB 6 to make it worth it? The other factor is that we will be keeping some users in the office on MI 4.12, so any network apps would still need to be written in MB 4.1 Ummm, did I just answer my own question?? Gerald Kornelsen -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
RE: MI MB: how to check if column XXX exists in table TTT
Give this a try... Dim i, j, ColNo As SmallInt For i = 1 to NumTables() If TableInfo(i, TAB_INFO_NAME) = "YourTableName" Then For j = 1 to TableInfo(i, TAB_INFO_NCOLS) ColNo = "COL" + j If ColumnInfo(I, ColNo, COL_INFO_NAME) = "YourColumnName" Then Goto ColumnFound End if Next End if Next ColumnFound: Print "OK" Scott Barling GIS/Assets Technical Assistant Eurobodalla Shire Council Tel:+61 (02) 4474 1251 Fax:+61 (02) 4474 1234 e-mail: [EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]> -Original Message- From: François Molle [SMTP:[EMAIL PROTECTED]] Sent: Thursday, July 06, 2000 10:21 PM To: MAPINFO-L Subject:MI MB: how to check if column XXX exists in table TTT Dear All Apparently, there are no function to know if column XXX exists in table TTT (is there ?) So I built a loop on all columns name to check whether one is equal to XXX. TTT as Alias, tesname as string For i=1 to Nbcolumn testname=ColumnInfo(TTT,"col"+str$(i),COL_INFO_NAME) If testname=TTT then print "OK" end if next For some reason, it does not accept this and gives the error: "Variable or Field TTT not defined" Is it because of the mismatch of variables, String and Alias ? If I use testname=str$(TTT) is does not work either. Thanks for any help to draw me out of this deadlock... Francois -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
Re: MI MB: Latest Agony
Tim Rood wrote: > > I'm trying to make a single polygon in a single table change colors using MB > and I can't seem to find the right MB incantation to make it happen. All I Another MapBasic agony? You might try swallowing a live toad before sitting down to your next MapBasic session. Then comparatively, the rest of the day will seem pretty pleasant. Anyway, here's how to do this: First you have to get access to the record with the polygon you want to change. There's lots of ways to do this (see SQL select, SelectionInfo(), fetch, etc.), but let's say the record cursor is pointing at it, and the table is called POLY. '--- dim objPoly as object dim brushPoly as brush 'you need to include mapbasic.def for color definitions brushPoly = makeBrush (2, YELLOW, WHITE) objPoly = POLY.obj nRow = POLY.rowid alter object objPoly info OBJ_INFO_BRUSH, brushPoly update POLY set obj = objPoly where rowid = nRow '--- What I didn't understand when I was first struggling with this myself is that you have to "update" the table or nothin shows. Also notice the "where rowid = nRow" bit. Leave this off and ALL you records get changed to this object. - Bill Thoen GISnet, 1401 Walnut St., Suite C, Boulder, CO 80302 tel: 303-786-9961, fax: 303-443-4856 mailto:[EMAIL PROTECTED], http://www.ctmap.com/gisnet -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
RE: MI MB: how to check if column XXX exists in table TTT
Here is an alternative to your code. It is a function that returns a logical true or false if the field 'Fname' is in table 'Tabname'. function FieldPresent(TabName as string, byval Fname as string) as logical dim i, TabCols as smallint TabCols = tableinfo(TabName, TAB_INFO_NCOLS) FieldPresent = false for i = 1 to TabCols if columninfo(TabName, "col"+i, COL_INFO_NAME) = Fname then FieldPresent = true exit for end if next end function -Original Message- From: François Molle [mailto:[EMAIL PROTECTED]] Sent: Thursday, July 06, 2000 7:21 AM To: MAPINFO-L Subject: MI MB: how to check if column XXX exists in table TTT Dear All Apparently, there are no function to know if column XXX exists in table TTT (is there ?) So I built a loop on all columns name to check whether one is equal to XXX. TTT as Alias, tesname as string For i=1 to Nbcolumn testname=ColumnInfo(TTT,"col"+str$(i),COL_INFO_NAME) If testname=TTT then print "OK" end if next For some reason, it does not accept this and gives the error: "Variable or Field TTT not defined" Is it because of the mismatch of variables, String and Alias ? If I use testname=str$(TTT) is does not work either. Thanks for any help to draw me out of this deadlock... Francois -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
Re: MI MB: Latest Agony
This may help Dim a as object Select * from <> where <> into temptable a = selection.obj ALTER OBJECT a INFO 3, MakeBrush(1, CYAN, BLUE) UPDATE TempTable set obj = oDMA where rowid = 1 Commit table <> interactive note Makebrush command format = (pattern, forecolour, backcolour) Ian - Original Message - From: Tim Rood <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Wednesday, July 05, 2000 6:02 PM Subject: MI MB: Latest Agony > > I'm trying to make a single polygon in a single table change colors using MB > and I can't seem to find the right MB incantation to make it happen. All I > want is to have the single selected polygon on the top layer of my map window > be a distinct color from the other polygons around it. And I'd like it to be > the same color every time the program fetches a new single polygon and puts > that one on top of the layer control pile. Does one of the MB experts in the > crowd have a minute to brief me on this? > Thanks, > Tim Rood > > > > -- > To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put > "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] > -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
Re: MI MB: how to check if column XXX exists in table TTT
Don't use an alias variable, TTT must be the name or id of the concerned table... Verify with XXX, not TTT in the IF statement try this Dim TTT, XXX as String TTT = "CRAZY TABLE" XXX = "COLUMN TO FIND" Nbcoclumn = TableInfo(TTT,TAB_INFO_NCOLS) For i=1 to Nbcolumn testname=ColumnInfo(TTT,"COL"+i,COL_INFO_NAME) If testname=XXX then print "OK" end if next ___ ||//Antoine Gilbert || // [EMAIL PROTECTED] || //#ICQ 9737371 || \\ || \\Le Groupe KOREM Inc. ||\\ http://www.korem.com Push'n'See : www.pushnsee.com MIG: www.mig.ca ___ - Original Message - From: François Molle <[EMAIL PROTECTED]> To: MAPINFO-L <[EMAIL PROTECTED]> Sent: Thursday, July 06, 2000 8:20 AM Subject: MI MB: how to check if column XXX exists in table TTT >Dear All > >Apparently, there are no function to know if column XXX exists in table >TTT (is there ?) >So I built a loop on all columns name to check whether one is equal to >XXX. > >TTT as Alias, tesname as string > >For i=1 to Nbcolumn >testname=ColumnInfo(TTT,"col"+str$(i),COL_INFO_NAME) >If testname=TTT then print "OK" end if >next > >For some reason, it does not accept this and gives the error: >"Variable or Field TTT not defined" >Is it because of the mismatch of variables, String and Alias ? >If I use testname=str$(TTT) is does not work either. > >Thanks for any help to draw me out of this deadlock... >Francois > >-- >To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put >"unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] > -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
Re: MI MB: Latest Agony
>I'm trying to make a single polygon in a single table change colors using MB >and I can't seem to find the right MB incantation to make it happen. All I >want is to have the single selected polygon on the top layer of my map window >be a distinct color from the other polygons around it. And I'd like it to be >the same color every time the program fetches a new single polygon and puts >that one on top of the layer control pile. Does one of the MB experts in the >crowd have a minute to brief me on this? These four lines change the selected object to solid green Dim o As Object o = Selection.Obj Alter Object o Info 3, MakeBrush(2, RGB(0,255,0), RGB(0,0,0)) Update Selection Set Obj = o I don't know how your "program fetchs a new single polygon and puts that one on top of the layer control pile", but you'll likely need a similar combination of Alter Object and Update statements. -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
Re: MI MB: how to check if column XXX exists in table TTT
- Original Message - From: François Molle <[EMAIL PROTECTED]> To: MAPINFO-L <[EMAIL PROTECTED]> Sent: Thursday, July 06, 2000 8:20 AM Subject: MI MB: how to check if column XXX exists in table TTT > Dear All > > Apparently, there are no function to know if column XXX exists in table > TTT (is there ?) > So I built a loop on all columns name to check whether one is equal to > XXX. > > TTT as Alias, tesname as string > > For i=1 to Nbcolumn > testname=ColumnInfo(TTT,"col"+str$(i),COL_INFO_NAME) > If testname=TTT then print "OK" end if > next > > For some reason, it does not accept this and gives the error: > "Variable or Field TTT not defined" > Is it because of the mismatch of variables, String and Alias ? > If I use testname=str$(TTT) is does not work either. 1. Always use strings (literals or variables as appropriate) for column names and table names. You will thank me later. 2. The only way to detect if a column exists or doesn't exist is to use ColumnInfo. If the column doesn't exist, MapBasic will raise an error. You must write an error handler to intercept this error and make the routine retrun FALSE instead of terminating the application. Hope this helps. Spencer 2. -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB: how to check if column XXX exists in table TTT
Dear All Apparently, there are no function to know if column XXX exists in table TTT (is there ?) So I built a loop on all columns name to check whether one is equal to XXX. TTT as Alias, tesname as string For i=1 to Nbcolumn testname=ColumnInfo(TTT,"col"+str$(i),COL_INFO_NAME) If testname=TTT then print "OK" end if next For some reason, it does not accept this and gives the error: "Variable or Field TTT not defined" Is it because of the mismatch of variables, String and Alias ? If I use testname=str$(TTT) is does not work either. Thanks for any help to draw me out of this deadlock... Francois -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB printing of browser with page numbers
Does anyone know of a solution to get page numbers printed when a browser window is printed? The print command just seems to print consequtive pages across and then down without any page numbers. One problem with using a layout is the number of columns, column widths, and number of rows is not known until a 'print browser' button is clicked, and it seems like a lot of processing would be necessary just to get page numbers on a browser printout. I know if the solution is easy that it might already be part of MapInfo, but I can hope that either there is a solution out there, or, that I have missed some function in MB or MI. TIA Brad -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI/MB Setup routine to install a MapBasic application
Hi, I've written a MapBasic application & data files that I want to distribute. Can anyone suggest a way to go about writing a setup routine for this? I do not curently have other programming languages such as VB. I could give instructions to simply copy the files accross using windows explorer, but aside from this looking unprofessional, the files copy accross from CD as 'read only'. Thanks in advance Ian -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB: Latest Agony
I'm trying to make a single polygon in a single table change colors using MB and I can't seem to find the right MB incantation to make it happen. All I want is to have the single selected polygon on the top layer of my map window be a distinct color from the other polygons around it. And I'd like it to be the same color every time the program fetches a new single polygon and puts that one on top of the layer control pile. Does one of the MB experts in the crowd have a minute to brief me on this? Thanks, Tim Rood -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB: Version 6 and Printer Orientation
Hello, Under version 5.5 of Mapbasic I had a dialog box where the user was asked what layout size and orientation they wanted for a print. The user selected from a radio button the paper size (A4 -> A0) and clicked on a button which accessed M_FILE_PAGE_SETUP where they could select the orientation and also select the printer / paper size. On returning from M_FILE_PAGE_SETUP I knew what paper size the user wanted (from the radio button) and could also detect the orientation by using the windowinfo() function as follows:- MORIENTATION=WINDOWINFO(FRONTWINDOW(),WIN_INFO_PRINTER_ORIENT) I then went off and loaded a layout which was of the correct size and orientation (A3 Landscape for example) and contained borders, logos, titles etc. My question is how do I reproduce this functionality under version 6.0? The documentation suggests now using M_EDIT_PREFERENCES_PRINTER, but I cant get this to work. Mapinfo still seems to return the orientation that has been set using page setup not the one set under Options/Printers. I'd really appreciate someones help on this as its driving me mad!! Kind Regards Owen Analyst Programmer UK -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB: Error Message Frustrations
I have been "playing" with MB to figure out the use of layoutN "tables," i.e., how to select and modify objects in a layout. My "play" involves a "select * from layout1" type of query in the MB window that returns a "File #0 not registered for access" error. I admit that I'm not fluent in MB, but there doesn't seem to be a single reference to that particular concept (registering files for access) anywhere in the MB literature that I have. So, I have to appeal to the list for help. As long as I am, does anyone know where, in the MI/MB official archives or elsewhere, error messages are explained. That seems to be a major failure of every application, language, OS or any other computer-related document I've ever seen: they stop explaining (run out of money?) before they write the error messages appendix. Maybe no one else ever makes errors, but I do and knowing what to do about them would be a valuable thing. But, I editorializeThanks for your help. Tim Rood -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB: Error Message Frustrations
I have been "playing" with MB to figure out the use of layoutN "tables," i.e., how to select and modify objects in a layout. My "play" involves a "select * from layout1" type of query in the MB window that returns a "File #0 not registered for access" error. I admit that I'm not fluent in MB, but there doesn't seem to be a single reference to that particular concept (registering files for access) anywhere in the MB literature that I have. So, I have to appeal to the list for help. As long as I am, does anyone know where, in the MI/MB official archives or elsewhere, error messages are explained. That seems to be a major failure of every application, language, OS or any other computer-related document I've ever seen: they stop explaining (run out of money?) before they write the error messages appendix. Maybe no one else ever makes errors, but I do and knowing what to do about them would be a valuable thing. But, I editorializeThanks for your help. Tim Rood -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB - Adding an image to an About Box
Hi, I have noticed a number of MBX'x have a company logo displayed in the about box. Can this be done in MapBasic and how, given the limited number of controls? Or is it a case of writing a VB or Delphi app just to show the about box. Thanks in advance Lorraine -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB color
Hi, Is There somebody that knows how we can change automaticly the color of each ligne (from a selection) in batch process with mapbasic. Thank you in advance Claude Couture GeoCom TMS Inc. Responsable de la cartographie 418 650-5500 ext 27 Fax 418 650-3291 www.geocomtms.com -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
RE: MI MB Sound possible???
Yes, it is possible - pulled this code from a project of mine a few years ago - I also have some advanced code which makes it possible to embed these sounds (and other things) inside the MBX as well - the API should still be valid - have fun! Ralph include "mapbasic.def" Declare Sub Main Declare Sub ButtonAction Declare Function WAVEcaller(byval sWaveFile as string,byval lWait as logical) as logical Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Integer) As Logical 'sndPlaySound Def define SND_ASYNC&H1 'The sound is played asynchronously, and the function returns 'immediately after beginning the sound. To terminate an 'asynchronously played sound, call SndPlaySound with the 'lpszSoundName parameter set to NULL. define SND_LOOP &H8 'The sound continues to play repeatedly until sndPlaySound 'is called again with the lpszSoundName parameter set to NULL. 'You must also specify the SND_ASYNC flag to loop sounds. define SND_MEMORY &H4 'The parameter specified by lpszSoundName points to an 'in-memory image of a waveform sound. define SND_NODEFAULT&H2 'If the sound cannot be found, the function returns 'silently without playing the default sound. define SND_NOSTOP &H10 'If a sound is currently playing, the function 'immediately returns FALSE without playing the requested sound. define SND_SYNC &H0 'The sound is played synchronously, and the function 'does not return until the sound ends. dim iFileLength as integer Sub Main dialog title "Seasons Greetings!" control button title "Tada" ID 1 Calling ButtonAction control button title "Ding" ID 2 Calling ButtonAction control button title "Chord" ID 3 Calling ButtonAction End Sub Sub ButtonAction dim a as smallint,runstring as string a=triggercontrol() do case a Case 1 runString="c:\windows\media\tada.wav" Case 2 runString="c:\windows\media\ding.wav" Case 3 runString="c:\windows\media\chord.wav" end case if not WAVEcaller(runstring,true) then Note "Sorry" end if end sub Function WAVEcaller(byval sWaveFile as String,byval lWait as logical) as logical 'platform test if systeminfo(SYS_INFO_MIPLATFORM)<>MIPLATFORM_WIN32 then beep exit sub end if if not lWait then WAVEcaller= sndPlaySound(sWaveFile, SND_ASYNC + SND_NODEFAULT ) else WAVEcaller=sndPlaySound(sWaveFile, SND_SYNC+ SND_NODEFAULT) end if End Function -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of Keith Campbell Sent: Tuesday, May 30, 2000 8:17 AM To: Simon W Fox Cc: [EMAIL PROTECTED] Subject: Re: MI MB Sound possible??? Simon, One option is to use the 'Run Program' statement to start another Windows application that will play a sound clip. You provide the file name of the clip as part of the argument to the statement. Keith > From: Simon W Fox <[EMAIL PROTECTED]> > To:"'[EMAIL PROTECTED]'" <[EMAIL PROTECTED]> > Subject: MI MB Sound possible??? > Date: Tue, 30 May 2000 10:57:17 +0100 > Good morning, > > I've looked through the archives for any information regarding playing sound > through a Mapbasic script. I found several messages asking similar > questions, but found no answers. From this I take it that, either it's not > possible or no one out there knows how to do it. > > My question is: If I can't do it in Mapbasic, is it possible to do it in VB? > and if so, how? > > Thanks > > Simon > > > -- > To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put > "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] > Keith Campbell GIS Consultant W S Atkins Consultants Ltd UK -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB: intersecting line with polygon
Hi, I have a table with many polygons and an object variable containing a polyline. I'd like to know, for each polygon intersected by the polyline, the length of the part of the line that falls within it. Is it possible to achieve that through MB? thanks in advance, Jeff Lepine [EMAIL PROTECTED]
RE: MI MB: Turning of zoom/resize/pan etc of map window
This is a multiple facets undertaking, as complex as you want to be sure the user will not modify the view. You will have to act on 4 different "environments : map menu, map shortcut menu, toolpad and MapBasic window. 1 - You must eliminate the menu items that deal with the map view and restore them later (It seems that you cannot enable/disable them because they are in a context sensitive menu that tends to override this function) alter menu id 9 remove 805, 806, 807 '(for change view, previous view, view entire layer) alter menu id 9 add "Change view" id 805, "Previous View" id 806... This technique has one drawback, the "new" items are added at the end of menu, not in their original places. Before adding them, you will have to remove all the following not-deleted items and recreate the original list. A more drastic measure would be to eliminate completely the map menu (alter menu bar remove id 9) but it does not work because it is a context sensitive menu) 2 - If you have no need for the tools contained in the toolpad Main ID 1, just turn it off/on alter buttonpad id 1 hide/show If you need some of these tool buttons, then define a toolpad wirh only those you need and display it instead of ID 1 3 - Do not forget to turn off also the menu items in the short cut menu ID 17 with the "alter menu id 17 remove 805, 806, 807" as in 1- above, restoring them later with the same order constraint as already noted. 4 - All that would be to no avail if you leave the MapBasic window accessible. You must remove the item menu Show MapBasic Window (608) from the "Options" menu (ID 5) and from the "Tools" buttonpad (ID 3) Well, that is all I have found with my limited experience. All the codes are contained in the MapInfow.MNU file but if you want clearer listings and some explanations, have a look at "MiniGuide to the MapBasic Window" on our site. Those commands are operational from the MBWindow and may be of use for changing menus/pads on the fly with short scripts. Jacques Parise-mail alternate [EMAIL PROTECTED] [EMAIL PROTECTED]paris PC Consult (mainly MapInfo app.) www.total.net/~rparis/gisproducts.htm -Original Message-From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of Frontier Mapping Pty LtdSent: June 6, 2000 1:03 PMTo: MapInfo Discussion GroupSubject: MI MB: Turning of zoom/resize/pan etc of map window Hi, Is there any way you can disable the pan/zoom functions for a particular map window? I'd also like to prevent the user from resizing the map window. (I'm setting up title boxes etc and want them to be standard) I've found you can turn AutoScrolling etc off using the Set Map function, but I was thinking more along the lines of disabling the zoom/hand toolbar buttons when a designated map window was active. Ta, Michelle
MI MB: Turning of zoom/resize/pan etc of map window
Hi, Is there any way you can disable the pan/zoom functions for a particular map window? I'd also like to prevent the user from resizing the map window. (I'm setting up title boxes etc and want them to be standard) I've found you can turn AutoScrolling etc off using the Set Map function, but I was thinking more along the lines of disabling the zoom/hand toolbar buttons when a designated map window was active. Ta, Michelle
ADD: new versions of MI/MB books
I have rewritten the "MiniGuide to the MapBasic Window", updating it to version 5.5 and expanding its contents noticeably. The "MiniGuide... " and "My Bag o'Tricks" are now available as PDF files taking full advantages of indexing and bookmarks to facilitate research. There are in a format that makes screen reading easy : one landscape page fills the screen and generous point sizes allow reading a full page without having to scroll or to zoom in. You can order those "books" from our site that has been revamped. If you are an old acquaintance, you should pay it a visit to check for new versions of several "program" files. www.total.net/~rparis/gisproducts.htm Jacques Paris e-mail [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
RE: MI MB: Zoom to Cosmetic layer
Tim, Assuming that your front window is defined, try these 3 short lines Set Map Layer 0 Editable On run menu command 303'select all (it will automatically point to the 'cosmetic layer if it has been set editable) 'NOTE rmc 303 does not work from the MapBasic Window 'This 3 line program must be compiled and it works. run menu command 306'find selection and if you do not like to see all the objects selected run menu command 304'unselect all Jacques Paris e-mailalternate [EMAIL PROTECTED] [EMAIL PROTECTED] paris PC Consult (mainly MapInfo app.) www.total.net/~rparis/gisproducts.htm -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of Tim.Nuteson (Exchange) Sent: June 2, 2000 1:14 PM To: '[EMAIL PROTECTED]' Subject: MI MB: Zoom to Cosmetic layer Does anyone know how I might zoom to show all cosmetic objects with MapBasic? These methods do not work: 1. Set Map Zoom Entire Layer 0 (zooms out to show everything, cosmetic or not) 2. Set Map Zoom Entire Layer Cosmetic1 (invalid view layer) 3. Select the cosmetic objects, Add Map Layer Selection, Set Map Zoom Entire Layer 1 (zooms OK, but wipes out the cosmetic objects) Any workarounds / tips? Thanks. Tim Nuteson Target Corporation [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB: Zoom to Cosmetic layer
Does anyone know how I might zoom to show all cosmetic objects with MapBasic? These methods do not work: 1. Set Map Zoom Entire Layer 0 (zooms out to show everything, cosmetic or not) 2. Set Map Zoom Entire Layer Cosmetic1 (invalid view layer) 3. Select the cosmetic objects, Add Map Layer Selection, Set Map Zoom Entire Layer 1 (zooms OK, but wipes out the cosmetic objects) Any workarounds / tips? Thanks. Tim Nuteson Target Corporation [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
Re: MI MB: ErrorHandler
Hi Silke, I've had problems with error handling in the past too. I found I could only get the handler to work if it was at the very beginning of a subroutine (right after the DIM statements). Hope this helps Ian Allan Silke Keuerleber wrote: > Dear listers, > > Can anyone tell me, why the following code doesn't force the program to use > the errorhandler routine whenever anyfile doesn't exist? > > sub anysub > > OnError Goto Errorhandler > > . > .. > ... > > Register Table anyfile TYPE ASCII Delimiter 59 Titles Charset > "WindowsLatin1" Into anytable > skip: > > . > .. > ... > > exit sub > > Errorhandler: > if instr(0,error$(),"errormessage") then > resume skip > end if > > end sub > > Silke Keuerleber > > PTV AG > Verkehrstelematik > Softwareentwicklung > > Tel.: +49 7 21 96 51- 465 > Fax:+49 7 21 96 51- 693 > E-Mail: [EMAIL PROTECTED] > > > PTV > Planung Transport Verkehr AG > Stumpfstrasse 1 > 76131 Karlsruhe > Germany > http://www.ptv.de > http://www.reiseplanung.de > http://www.varta-guide.de > http://www.cityguidefinder.de > > -- > To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put > "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
Re: MI MB: ErrorHandler
Why not check to see if the file exists first this will make the code much easier to read & more robust. Sub AnySub If FileExists(anyfile) then Register Table anyfile TYPE ASCII Delimiter 59 Titles Charset "WindowsLatin1" Into anytable else Note "Error opening " & anyfile Exit Sub End If . . End Sub William. ***Internet Email Confidentiality Footer*** Privileged/Confidential Information may be contained in this message. If you are not the addressee indicated in this message (or responsible for delivery of the message to such person), you may not copy or deliver this message to anyone. In such case, you should destroy this message and kindly notify the sender by reply email. Please advise immediately if you or your employer do not consent to Internet email for messages of this kind. Opinions, conclusions and other information in this message that do not relate to the official business of my firm shall be understood as neither given nor endorsed by it. -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB: ErrorHandler
Dear listers, Can anyone tell me, why the following code doesn't force the program to use the errorhandler routine whenever anyfile doesn't exist? sub anysub OnError Goto Errorhandler . .. ... Register Table anyfile TYPE ASCII Delimiter 59 Titles Charset "WindowsLatin1" Into anytable skip: . .. ... exit sub Errorhandler: if instr(0,error$(),"errormessage") then resume skip end if end sub Silke Keuerleber PTV AG Verkehrstelematik Softwareentwicklung Tel.: +49 7 21 96 51- 465 Fax:+49 7 21 96 51- 693 E-Mail: [EMAIL PROTECTED] PTV Planung Transport Verkehr AG Stumpfstrasse 1 76131 Karlsruhe Germany http://www.ptv.de http://www.reiseplanung.de http://www.varta-guide.de http://www.cityguidefinder.de -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
Re: MI MB Sound possible???
Simon, One option is to use the 'Run Program' statement to start another Windows application that will play a sound clip. You provide the file name of the clip as part of the argument to the statement. Keith > From: Simon W Fox <[EMAIL PROTECTED]> > To:"'[EMAIL PROTECTED]'" <[EMAIL PROTECTED]> > Subject: MI MB Sound possible??? > Date: Tue, 30 May 2000 10:57:17 +0100 > Good morning, > > I've looked through the archives for any information regarding playing sound > through a Mapbasic script. I found several messages asking similar > questions, but found no answers. From this I take it that, either it's not > possible or no one out there knows how to do it. > > My question is: If I can't do it in Mapbasic, is it possible to do it in VB? > and if so, how? > > Thanks > > Simon > > > -- > To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put > "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] > Keith Campbell GIS Consultant W S Atkins Consultants Ltd UK -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB Sound possible???
Good morning, I've looked through the archives for any information regarding playing sound through a Mapbasic script. I found several messages asking similar questions, but found no answers. From this I take it that, either it's not possible or no one out there knows how to do it. My question is: If I can't do it in Mapbasic, is it possible to do it in VB? and if so, how? Thanks Simon -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB: Converting points to region
Is there another program available besides ConnectTheDots that will draw a region around selected points. The connectthedots program draws a region around the selected points by the order they appear in the MapInfo table. Therefore, the program does not always create a "nice" region around the points. I would like to draw a "buffered" region around the selected points regardless of what order they appear in the MI table. Any help on this would be appreciated. steve -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
RE: MI MB: Accuracy of Centroidx / ObjectGeography Return Values
Hi Mike - The decimals are there, just truncated. Select a point, then type this in the MapBasic window... note format$(centroidx(selection.obj),"###.") I don't know why it does it but I think there was something to that effect posted some time ago (Jacques Paris, maybe?) We get around it by storing data in UTM or Alberta 10TM projections. If you create a float field and populate it with centroidx(obj), you will only see the output rounded to 3 places. Change the field to Decimal 12,6 and it will show all those places. Hope this helps... Lindsay Giles Senior GIS Analyst AXYS Environmental Consulting Ltd Suite 600-555 4th Ave. SW Calgary, AB T2P 3E7 e-mail: [EMAIL PROTECTED] Main Office:403-269-5150 Direct Line:403-750-7671 Fax:403-269-5245 Visit our web site at http://www.axys.net -Original Message- From: Mike Haden [SMTP:[EMAIL PROTECTED]] Sent: Monday, May 15, 2000 10:09 AM To: MapInfo Mailing List Subject:MI MB: Accuracy of Centroidx / ObjectGeography Return Values Good morning, all : Maybe this one has come up before, but I've scanned through the last several thousand MI messages to find some reference to the problem without success. So here goes: I have many tables of petroleum wells which were defined as point objects using the standard Lat/Long NAD 27 for Canada projection without bounds. They were created in the table with 6 decimals of accuracy (ie. x/y of -114.234678 54.943219). When I double-click on a well in a given map, the dialogue displays the same 6 decimals of accuracy. However, when I call ObjectGeography(Obj,1) or ObjectGeography(Obj,2) or CentroidX(Obj) or CentroidY(Obj), I receive only 3 decimals of accuracy on longitudes, and 4 decimals of accuracy on latitudes. Can anyone explain why ObjectGeography / Centroidx don't return the same number of decimals as originally defined ? Is there a workaround to this ? I've poked through the system settings, played around with bounds on the coordsys, and I've yet to come up with anything which will change the behaviour of these function calls. Any assistance will be gratefully received. Thanks. Mike Haden Software Developer Sterne Stackhouse Inc. [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB: Accuracy of Centroidx / ObjectGeography Return Values
Good morning, all : Maybe this one has come up before, but I've scanned through the last several thousand MI messages to find some reference to the problem without success. So here goes: I have many tables of petroleum wells which were defined as point objects using the standard Lat/Long NAD 27 for Canada projection without bounds. They were created in the table with 6 decimals of accuracy (ie. x/y of -114.234678 54.943219). When I double-click on a well in a given map, the dialogue displays the same 6 decimals of accuracy. However, when I call ObjectGeography(Obj,1) or ObjectGeography(Obj,2) or CentroidX(Obj) or CentroidY(Obj), I receive only 3 decimals of accuracy on longitudes, and 4 decimals of accuracy on latitudes. Can anyone explain why ObjectGeography / Centroidx don't return the same number of decimals as originally defined ? Is there a workaround to this ? I've poked through the system settings, played around with bounds on the coordsys, and I've yet to come up with anything which will change the behaviour of these function calls. Any assistance will be gratefully received. Thanks. Mike Haden Software Developer Sterne Stackhouse Inc. [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB: Aligning dialog text
Hi - In a MapBasic dialog I'm writing, I need to have a column of dollar figures lined up vertically so the decimals and commas line up with each other. Adding leading spaces does not work, since the MB dialog font contains a variable-width font. Is there a way to force a text string to be right-justified? Any ideas / tips / tricks much appreciated. Thanks Tim Nuteson Target Corporation [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
Re: MI MB using a variable in a select statement
Let me get this right: Select Wells.Owner, Wells.Owner_Abbr, Wells.Owner_Well_No, YearField_str from Wells, Production where Wells.Primary_Key = Production.Primary_Key and YearField_str > 0 into Selection --- Try this query: Select W.Primary_Key, W.Owner, W.Owner_Abbr, W.Owner_Well_No, P.YearField_str from Wells W, Production P where W.Primary_Key = P.Primary_Key and P.YearField_str > 0 --- You didn't specify the table for the YearField_Str so I assumed that you're referring to Production table. If you had SpatialWare/Informix installed with MapInfo, then it would be much easier. Good luck! -- Erick Posner Join AllAdvantage! Earn $ while you surf anywhere on the Web http://www.alladvantage.com/go.asp?refid=cbl286 - Original Message - From: Tim Warman <[EMAIL PROTECTED]> To: Mapinfo-L <[EMAIL PROTECTED]> Sent: Tuesday, May 02, 2000 9:45 AM Subject: MI MB using a variable in a select statement Listers, Is it possible to use a string variable in a select statement? The following bit of code doesn't seem to work: Select Wells.Owner, Wells.Owner_Abbr, Wells.Owner_Well_No, YearField_str from Wells, Production where Wells.Primary_Key=Production.Primary_Key and YearField_str>0 into Selection The YearField_str value has the form Production._19xx, with the actual year value obtained from a dialog box where the user types in the year they want to query. TIA _ Tim Warman Geologist & GIS Specialist Richard C. Slade & Associates North Hollywood, CA (818) 506-0418 -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB using a variable in a select statement
Listers, Is it possible to use a string variable in a select statement? The following bit of code doesn't seem to work: Select Wells.Owner, Wells.Owner_Abbr, Wells.Owner_Well_No, YearField_str from Wells, Production where Wells.Primary_Key=Production.Primary_Key and YearField_str>0 into Selection The YearField_str value has the form Production._19xx, with the actual year value obtained from a dialog box where the user types in the year they want to query. TIA _ Tim Warman Geologist & GIS Specialist Richard C. Slade & Associates North Hollywood, CA (818) 506-0418 -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB: Querying overlapping labels
Hello, Is there a function in MB that can determine if a label object overlap another one (kind of a boolean function)? I'm asking 'cause I have a layer with overlapping labels and don't want to show them(I know that I can set overlapping to off, but then one of the two or three overlapping labels will still be visible, exactly what I'm trying to avoid). In fact, the only visible labels I want are those who don't overlap with any other. In my idea, if I can use a true/false function, I can then use a condition in which I would specify to show only the labels with a false value. I tried to read through the MB docs, but didn't find anything satisfying. So, if you have any idea how to achieve that (or have another way to achieve the same result), it would be gladly appreciated. Thanks in advance for answering, Jeff Lepine
Re: MI/MB: Text object orientation
Hi J-F! You can use this function in the Update Column dialog: ObjectGeography(obj, 7)---> same as ObjectGeography(obj, OBJ_GEO_TEXTANGLE) in MapBasic. Hope this help! Ciao!! ___ ||// François Bergeron || //Conseiller en Géomatique || // [EMAIL PROTECTED] || \\ || \\ Le Groupe KOREM Inc. ||\\ http://www.korem.com Formation MapInfo: http://www.korem.com/formation.html MIG!! www.mig.ca 680, Boul. Charest Est Québec (Québec) CANADA G1K 3J4 ___ -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI/MB: Text object orientation
Hi, I had to import a .e00 file containing text objects. Many of them had an orientation. Now, I need to know this orientation so I can put it in a new field which will be used later for labeling purpose (in order to give the labels the same orientation as the text objects). So, my question is: How can I achieve that through MapInfo or MapBasic? Thanks in advance for your answers, Jeff Lepine [EMAIL PROTECTED]
MI MB Global and Dim in Project
I'm not sure whether to define certain variables using Global or Dim in a Project. I have a project comprised of several modules, one module which is used for checking the validity of user input in edittext boxes. I am changing most Global statements to Dim statements (outside of procs) in each module because for the most part each module is independent of each other. Therefore the Dims will act as Globals only for that module. However, I use parameters to pass the contents of an edittext variable to another procedure in a different module for checking valid user specified file names and data input. Hence my uncertainty - can I define the variables passed using Dim (which seems to work) or should I/do I have to define them as Globals since they are being used by two modules? Maybe I'm not quite sure about the behaviour of parameters? TIA Kingsley ** K Gum Senior Research Assistant Australian Housing and Urban Research Institute Queensland University of Technology Ph: (07) 3864 1750 Fax: (07) 3864 1827 Email: [EMAIL PROTECTED] ** -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI MB - Note
At times I use 'Note' inside programs for error checking of variable contents. On a few occasions now I have found that instead of finding errors this method creates errors. This most recently has occurred while assigning values from table columns to variables to calculate and then update other columns. Variables are assigned the wrong values and even from the wrong records. Once deleting the 'Note' the code works perfectly. Trying to find phantom errors has been testing until I reached this conclusion. Could anyone support or deny my claims? Kingsley ** K Gum Senior Research Assistant Australian Housing and Urban Research Institute Queensland University of Technology Ph: (07) 3864 1750 Fax: (07) 3864 1827 Email: [EMAIL PROTECTED] ** -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
Re: MI/MB: Splash Screens
Colin, I'm away from the computer where I have the original code to do this, but essentially the way I did it was this: 1) Save your "splash" image as a TIF or JPEG (I used Adobe Photoshop to do this). Open it (as an unregistered image file) into MapInfo to get your Tab file. 2) In your MapBasic source code, use the time functions (Timer) to set a start time and a desired end time. As an example, a sub might look like this: Sub SPLASH Dim TICK,TOCK as integer TICK = Timer() Open Table "C:\FSRED.tab" as FSRED Map from FSRED Set Window FrontWindow() Max While TOCK < 10 If TOCK > 5 then Close Table FSRED Exit Sub End If TOCK = Timer() - TICK Wend End Sub FSRED is your splash image. This assumes that it will be the only window open when this runs. Of course, when the sub ends, you obviously want the program to move onto the next sub, so you would insert "Call SUB_NAME" just prior to the Exit Sub. Anyway, this probably ain't pretty, but it does work. Please bear in mind that I'm self-taught in MapBasic, and tend to use a brute force approach more often than not. I'm sure there are other MapBasic folks out there who have more eloquent approaches to this, and I hope you hear from them Mike Jenne At 06:40 PM 3/2/00 +, Colin Henderson wrote: >To the list, > >Does anyone know if it is possible to have a splash screen appear when my >mapbasic application runs? If so is it possible to code it in MapBasic? > >Any help greatly appreciated > >-- >Colin Henderson >Undergraduate >Bath Spa University College >mailto:[EMAIL PROTECTED] > >-- >To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put >"unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] >
Re: MI/MB: Splash Screens
Colin, Hate to sound ill-informed, but what's a splash screen? If it's what I think it is, I know how to code it. Mike Jenne At 06:40 PM 3/2/00 +, Colin Henderson wrote: >To the list, > >Does anyone know if it is possible to have a splash screen appear when my >mapbasic application runs? If so is it possible to code it in MapBasic? > >Any help greatly appreciated > >-- >Colin Henderson >Undergraduate >Bath Spa University College >mailto:[EMAIL PROTECTED] > >-- >To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put >"unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED] > -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
MI/MB: Splash Screens
To the list, Does anyone know if it is possible to have a splash screen appear when my mapbasic application runs? If so is it possible to code it in MapBasic? Any help greatly appreciated -- Colin Henderson Undergraduate Bath Spa University College mailto:[EMAIL PROTECTED] -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
RE: MI MB Determining the Base Table of a Query
Hi Jacques and Bill Why not use SelectionInfo(SEL_INFO_TABLENAME)? Ofcouse you will have to select at least on record in your Query first. Regards Thomas Brix Lyng Frederikshavn Municipal Administration Denmark -- Fra: Jacques Paris[SMTP:[EMAIL PROTECTED]] Sendt: 28. februar 2000 15:30 Til: [EMAIL PROTECTED] Emne: RE: MI MB Determining the Base Table of a Query Totally undocumented. A very pleasant discovery I made recently. If you use tableinfo(your_query_name, TAB_INFO_MAPPABLE_TABLE) (code 12 in the MBW) you get the name of the base table ot your query. MB reference states that this code should return the name of the table containing graphical objects for a table resulting for a relational join. That is not the case, i.e. it does much more. It even works with queries based on tables that are NOT MAPPABLE. Jacques Paris e-mailalternate [EMAIL PROTECTED] [EMAIL PROTECTED] paris PC Consult (mainly MapInfo app.) www.total.net/~rparis/gisproducts.htm -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of Landis, Bill @ Phoenix Sent: February 23, 2000 8:57 AM To: MapInfo Mail List 1 (E-mail) Subject: MI MB Determining the Base Table of a Query Anyone know how to determine the base table of a query using MapBasic? For example if Query3 is a selection of block groups from table BG1999, how do I determine that Query3 is based on table BG1999? Thank you, Bill Landis... -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
RE: MI MB Determining the Base Table of a Query
Title: MB Determining the Base Table of a Query Totally undocumented. A very pleasant discovery I made recently. If you use tableinfo(your_query_name, TAB_INFO_MAPPABLE_TABLE) (code 12 in the MBW) you get the name of the base table ot your query. MB reference states that this code should return the name of the table containing graphical objects for a table resulting for a relational join. That is not the case, i.e. it does much more. It even works with queries based on tables that are NOT MAPPABLE. Jacques Parise-mail alternate [EMAIL PROTECTED] [EMAIL PROTECTED]paris PC Consult (mainly MapInfo app.) www.total.net/~rparis/gisproducts.htm -Original Message-From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of Landis, Bill @ PhoenixSent: February 23, 2000 8:57 AMTo: MapInfo Mail List 1 (E-mail)Subject: MI MB Determining the Base Table of a Query Anyone know how to determine the base table of a query using MapBasic? For example if Query3 is a selection of block groups from table BG1999, how do I determine that Query3 is based on table BG1999? Thank you, Bill Landis...
MI MB Determining the Base Table of a Query
Title: MB Determining the Base Table of a Query Anyone know how to determine the base table of a query using MapBasic? For example if Query3 is a selection of block groups from table BG1999, how do I determine that Query3 is based on table BG1999? Thank you, Bill Landis...
Re: MI MB Run Command Confusion
Never mind. I figured it out. Don't need the Run Command Some time my dumbness amazes even me. -- Roy N. Chiappini Randa Enterprises [EMAIL PROTECTED] http://www.srv.net/~ziccardi/randa -- To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]