ParametricPlot3D output without the meshlines

Question

Caveat: Mathematica version 3.0. if (or when) it matters.

I define a 3D-object with ParametricPlot3D, say, the following:

tube=ParametricPlot3D[2{Cos[t],Sin[t],u},{t,0,2Pi},{u,-5,5}]

This is rendered just fine, I can save and use it (in eps-format) in my TeX-docs just fine. But the surface is kinda crowded with the meshlines, and I want to draw my students attention to the curves I draw on this surface anyway. Therefore the meshlines are a nuisance and must go. But how to render this without them? Listing some options...

1. RTFM. Searching in the help gives promising hits such as EdgeForm[], Mesh->None et cetera, but none seem to work with ParametricPlot3D. I tried to print tube using FullForm in order to strip the Graphics3D-header, and insert an EdgeForm[] at the beginning, but something went wrong, and I'm not experienced enough Mathematica user to really figure that out.
2. Look from Wolfram's on-line help. It lists Mesh->None as an option of ParametricPlot3D, but that must (?) refer to a newer version, as it didn't work with mine.
3. Do it yourself! I like to think I'm enough of a programmer to build the required list of polygons myself, and insert the EdgeForm[]-command there. But this is a lot of work, and I'm kinda in a hurry.
4. Upgrade? I work at a Uni. I could get to use a departmental license for an upgraded version. But then I would be behind the license-daemon, couldn't easily use it at home et cetera. That's the charm of the old license for version 3.0, when all you had to do was to inser your activation code (or whatever).

Answer 1

This appears to work for older versions of Mathematica

tube=ParametricPlot3D[2{Cos[t],Sin[t],u},{t,0,2Pi},{u,-5,5}]
tube /. Polygon[a__]:> {EdgeForm[], Polygon[a]}

Answer 2

Actually, in old versions of Mathematica, one can do something like this:

ParametricPlot3D[{2 Cos[t], 2 Sin[t], 2 u, EdgeForm[]}, {t, 0, 2 Pi}, {u, -5, 5}];

That is to say, one can use a list of length 4 as an argument to ParametricPlot3D[], where the first three components are the curve or surface to be plotted, and the fourth component is a directive or a list of directives.

Answer 3

The 3D graphics system was fairly consistent from version 2.0 through version 5.2, with the book by Tom Wickham-Jones being the standard reference. All graphics changed dramatically in version 6; however, you can still access the old graphics system by executing <<Version5`Graphics`. Thus, even in V8, you can test your answer to this question as follows.

<< Version5`Graphics`
ParametricPlot3D[{r*Cos[t], r*Sin[t], r^2, EdgeForm[]},
  {r, 0, 1}, {t, 0, 2 Pi}]

Afterward, you can go back to the new system by entering <<Version6`Graphics`.

Answer 4

Not tested in version 3 ...

tube=ParametricPlot3D[2{Cos[t],Sin[t],u},{t,0,2Pi},{u,-5,5}]
tube /. Line[List[x__]] -> List[]