- •Оператор Add Column
- •Оператор Add Map
- •Оператор Alter Button
- •Оператор Alter ButtonPad
- •Оператор Alter Cartographic Frame
- •Оператор Alter Control
- •Оператор Alter MapInfoDialog
- •Оператор Alter Menu
- •Оператор Alter Menu Bar
- •Оператор Alter Menu Item
- •Оператор Alter Object
- •Оператор Alter Table
- •Оператор AutoLabel
- •Оператор Beep
- •Оператор Browse
- •Предложение Brush
- •Функция ButtonPadInfo( )
- •Оператор Call
- •Функция•CartesianArea( )
- •Функция CartesianBuffer( )
- •Функция CartesianDistance ( )
- •Функция CartesianObjectLen( )
- •Функция CartesianPerimeter( )
- •Функция Centroid( )
- •Предложение CharSet
- •Функция ChooseProjection$()
- •Оператор Close All
- •Оператор Close File
- •Оператор Close Table
- •Оператор Close Window
- •Функция CommandInfo()
- •Оператор Commit Table
- •Оператор Continue
- •Предложения Control Button / OKButton / CancelButton
- •Предложение Control CheckBox
- •Предложение Control EditText
- •Предложение Control GroupBox
- •Предложения Control ListBox / MultiListBox
- •Предложение Control PopupMenu
- •Предложение Control RadioGroup
- •Предложение Control StaticText
- •Функция ConvexHull( )
- •Предложение CoordSys
- •Оператор Create Arc
- •Оператор Create ButtonPad
- •Оператор Create ButtonPads As Default
- •Оператор Create Cartographic Legend
- •Функция CreateCircle( )
- •Оператор Create Ellipse
- •Оператор Create Frame
- •Оператор Create Grid
- •Оператор Create Index
- •Оператор Create Legend
- •Оператор Create Line
- •Оператор Create Map
- •Оператор Create Map3D
- •Оператор Create Menu
- •Оператор Create Menu Bar
- •Оператор Create Object
- •Оператор Create Pline
- •Оператор Create Point
- •Оператор Create Ranges
- •Оператор Create Rect
- •Оператор Create Redistricter
- •Оператор Create Region
- •Оператор Create Report From Table
- •Оператор Create RoundRect
- •Оператор Create Styles
- •Оператор Create Table
- •Оператор Create Text
- •Функция CreateText( )
- •Функция DateWindow( )
- •Оператор DDEExecute
- •Оператор DDEPoke
- •Оператор DDETerminate
- •Оператор DDETerminateAll
- •Оператор Declare Function
- •Оператор Declare Sub
- •Оператор Define
- •Оператор Delete
- •Оператор Dialog
- •Оператор Dialog Preserve
- •Оператор Dialog Remove
- •Оператор Dim
- •Оператор Do Case...End Case
- •Оператор Do...Loop
- •Оператор Drop Index
- •Оператор Drop Map
- •Оператор Drop Table
- •Оператор End MapInfo
- •Оператор End Program
- •Процедура EndHandler
- •Оператор Error
- •Оператор Exit Do
- •Оператор Exit For
- •Оператор Exit Function
- •Оператор Exit Sub
- •Оператор Export
- •Оператор Fetch
- •Оператор Find
- •Оператор Find Using
- •Предложение Font
- •Оператор For...Next
- •Процедура ForegroundTaskSwitchHandler
- •Функция FormatDate$
- •Оператор Function...End Function
- •Оператор Get
- •Оператор Global
- •Оператор Goto
- •Оператор Graph
- •Оператор If...Then
- •Оператор Import
- •Оператор Include
- •Оператор Input #
- •Оператор Insert
- •Функция Int( )
- •Функция IsPenWidthPixels()
- •Оператор Kill
- •Функция LabelFindByID( )
- •Функция LabelFindNext( )
- •Функция Labelinfo( )
- •Оператор Layout
- •Функция LegendFrameInfo( )
- •Функция LegendInfo( )
- •Функция LegendStyleInfo( )
- •Оператор Line Input
- •Процедура Main
- •Функция MakeCustomSymbol( )
- •Функция MakeFontSymbol( )
- •Оператор Map
- •Функция Map3dInfo( )
- •Оператор Menu Bar
- •Функция MenuitemInfoByID( )
- •Оператор Metadata
- •Оператор Note
- •Функция NumAllWindows( )
- •Оператор Objects Check
- •Оператор Objects Combine
- •Оператор Objects Enclose
- •Оператор Objects Erase
- •Оператор Objects Intersect
- •Оператор Objects Overlay
- •Оператор Objects Split
- •Оператор OnError
- •Оператор Open File
- •Оператор Open Report
- •Оператор Open Table
- •Оператор Open Window
- •Оператор Pack Table
- •Предложение Pen
- •Функция PenPattern()
- •Функция PenWidthToPoints()
- •Функция PointsToPenWidth()
- •Оператор Print
- •Оператор Print #
- •Оператор PrintWin
- •Оператор ProgressBar
- •Оператор Put
- •Оператор Randomize
- •Оператор ReDim
- •Оператор Register Table
- •Оператор Reload Symbols
- •Процедура RemoteMapGenHandler
- •Процедура RemoteMsgHandler
- •Оператор Remove Cartographic Frame
- •Оператор Remove Map
- •Оператор Rename File
- •Оператор Rename Table
- •Оператор Reproject
- •Оператор Resume
- •Оператор Rollback
- •Оператор Run Application
- •Оператор Run Command
- •Оператор Run Menu Command
- •Оператор Run Program
- •Оператор Save File
- •Оператор Save Window
- •Оператор Save Workspace
- •Оператор Seek
- •Процедура SelChangedHandler
- •Оператор Select
- •Оператор Server Begin Transaction
- •Оператор Server Bind Column
- •Оператор Server Close
- •Функция Server_ColumnInfo( )
- •Оператор Server Commit
- •Функция Server_Connect( )
- •Оператор Server Create Map
- •Оператор Server Disconnect
- •Функция Server_DriverInfo( )
- •Функция Server_EOT( )
- •Функция Server_Execute( )
- •Оператор Server Fetch
- •Функция Server_GetodbcHConn( )
- •Функция Server_GetodbcHStmt( )
- •Оператор Server Link Table
- •Функция Server_NumCols( )
- •Функция Server_NumDrivers( )
- •Оператор Server Refresh
- •Оператор Server Rollback
- •Оператор Server Set Map
- •Оператор Set Application Window
- •Оператор Set Area Units
- •Оператор Set Browse
- •Оператор Set Cartographic Legend
- •Оператор Set Command Info
- •Оператор Set CoordSys
- •Оператор Set Date Window
- •Оператор Set Digitizer
- •Оператор Set Distance Units
- •Оператор Set Drag Threshold
- •Оператор Set Event Processing
- •Оператор Set File Timeout
- •Оператор Set Format
- •Оператор Set Graph
- •Оператор Set Handler
- •Оператор Set Layout
- •Оператор Set Legend
- •Оператор Set Map
- •Оператор Set Map3D
- •Оператор Set Next Document
- •Оператор Set Paper Units
- •Оператор Set ProgressBars
- •Оператор Set Redistricter
- •Оператор Set Resolution
- •Оператор Set Shade
- •Оператор Set Style
- •Оператор Set Table
- •Оператор Set Target
- •Оператор Set Window
- •Оператор Shade
- •Оператор StatusBar
- •Оператор Stop
- •Функция StyleAttr( )
- •Оператор Sub...End Sub
- •Предложение Symbol
- •Оператор Terminate Application
- •Функция Time()
- •Процедура ToolHandler
- •Оператор Type
- •Оператор UnDim
- •Функция UnitAbbr$( )
- •Оператор Unlink
- •Оператор Update
- •Оператор Update Window
- •Оператор While...Wend
- •Процедура WinChangedHandler
- •Процедура WinClosedHandler
- •Процедура WinFocusChangedHandler
- •Оператор Write #
- •Приложение A: Таблица кодов символов
- •Приложение В: Арифметические и географические операторы
- •ИНДЕКС
Предложение Pen
Предложение Pen
Назначение:
Задает стиль линии для графических объектов.
Синтаксис:
Pen pen_expr
где
pen_expr – выражение, результат которого есть величина типа Pen (или переменная типа Pen, или вызов функции, возвращающей такую величину, например, MakePen (width, pattern, color)).
Описание:
Предложение Pen не является отдельным оператором, а входит в состав некоторых операторов, в которых необходимо задавать стиль линии для некоторых графических объектов. Стиль линии представляет собой набор из атрибутов толщины линии, типа линии и цвета.
Это предложение используется, например, в операторе Create Line, который создает новый объект типа "линия". Предложение Pen задает стиль для нового объекта. Если оператор не использует это предложение, то будет использована текущая настройка этого стиля в MapInfo.
Параметр pen_expr должен быть величиной типа Pen и может задаваться переменной или выражением соответствующего типа:
Pen pen_var
или может задаваться вызовом функций CurrentPen( ) или MakePen( ), которые возвращают величины типа Pen:
Pen MakePen(1, 2, BLUE)
В некоторых операторах (например, Set Map) после слова Pen стиль задается непосредственно набором из трех целочисленных параметров (width, pattern и color), например:
Pen(1, 2, BLUE)
Заметим, что некоторые операторы MapBasic используют выражения тип Pen как параметры без ключевого слова. Одним из примеров является оператор Alter Object.
В следующей таблице приводится описание параметров стиля линии:
Компонента стиля |
Описание |
width |
Толщина линии в точках, величина типа Integer, от 1 до 7 |
|
включительно. Если Вы хотите иметь невидимую линию в объекте, |
|
то задайте нулевую толщину. При этом, если параметр будет равен |
|
0, то параметр типа линии pattern должен быть равен 1 (единице). |
pattern |
Тип линии, величина типа Integer, от 1 до 77 (смотрите таблицу |
|
ниже). Значение 1 обозначает невидимую линию. |
color |
Цвет линии в системе RGB, величина типа Integer. Смотрите |
|
описание функции RGB( ). |
374 |
Справочник MapBasic |
Предложение Pen
В следующей таблице показаны образцы линий и их номера:
Пример:
Include "MAPBASIC.DEF"
Dim cable As Object
Create Line
Into Variable cable
(73.5, 42.6) (73.67, 42.9) Pen MakePen(1, 2, BLACK)
Смотрите также:
Alter Object, Create Line, Create Pline, CurrentPen( ), MakePen( ), RGB( ), Set Style
Справочник MapBasic |
375 |
Функция PenPattern()
Функция PenPattern()
Назначение:
Возвращает номер стиля линии.
Синтаксис:
PenPattern ( pattern, isinterleaved )
pattern L это целое значение, соответствующее номеру стиля линии.
isinterleaved L это булевская величина, истинная, если линии перекрещивающиеся, и ложная, если линии накладывающиеся.
Описание:
Функция PenPattern возвращает стиль линии для заданного номера стиля с и ли без установок для пересекающихся линий. Эта функция возвращает переменную типа целое, соответствующую определенному стандартному типу перекрещивающихся или наложенных линий. Используйте эту функцию для получения информации о стиле линии из перечня имеющихся стилей перекрещивающихся или наложенных стилей линий.
Пример:
Include “MAPBASIC.DEF”
Dim Cable As Object
Create Line
Into Variable Cable (73.5, 42.6) (73.67, 42.9)
Pen MakePen (3, PenPattern (65, True), Red)
Смотри также:
CurrentPen(), MakePen(),Pen, StyleAttr()
376 |
Справочник MapBasic |
Функция PenWidthToPoints()
Функция PenWidthToPoints()
Назначение:
Функция PenWidthToPoints возвращает размер в пунктах для линии данной ширины.
Синтаксис:
PenWidthToPoints ( penwidth )
penwidth это целое значение, большее чем 10, представляющее ширину линии.
Возвращаемое значение:
Вещественное.
Описание:
Функция PenWidthToPoints берет ширину линии и возвращает ее значение в пунктах. Ширина линии для стиля линии может быть возвращена с помощью функции StyleAttr. Ширина линии, возвращаемая функция StyleAttr может быть в пунктах или пикселах. Ширина шинии, меньшая чем 10 задается в пикселах. Любая ширина от 10 и более задается в пунктах. PenWidthToPoints будет возвращать значения только для линий с шириной, заданной в пунктах. Чтобы определить, в каких величинах задана ширина линии, в пунктах или пикселах, используйте функцию IsPenWidthPixels.
Пример:
Include “MAPBASIC.DEF”
Dim CurPen As Pen
Dim Width As Integer
Dim PointSize As Float
CurPen = CurrentPen()
Width = StyleAttr(CurPen, PEN_WIDTH)
If Not IsPenWidthPixels(Width) Then
PointSize = PenWidthToPoints(Width)
End If
Смотри также:
CurrentPen(), IsPenWidthPixels(), MakePen(),Pen, PointsToPenWidth(), StyleAttr()
Справочник MapBasic |
377 |