Class TCustomCmpClient
Unit
CustomCmpClient
Declaration
type TCustomCmpClient = class()
Description
the component type to communicate with a map server (abstract type)Fields
| Name | Description |
 |
FImage |
the result of an ExecMapRequest or GetMap |
 |
FImageHeight |
image height for the map, info request |
 |
FImageWidth |
image width for the map, info request |
 |
FInfoLayers |
comma separated list of layers for the info request (query layers have to be also defined in FLayers ) |
 |
FInfoRequest |
auto. generated info request |
 |
FInfoResult |
result of the info request (after calling ExecInfoRequest or GetInfo ) |
 |
FLayers |
comma separated list of layers for the map, info request |
 |
FMapRequest |
auto. generated map request |
 |
FMaxX |
max. X coordinate for the map, info request |
 |
FMaxY |
max. Y coordinate for the map, info request |
 |
FMinX |
min. X coordinate for the map, info request |
 |
FMinY |
min. Y coordinate for the map, info request |
 |
FOverviewMap |
overview map |
 |
FOverviewMapRequest |
request for a overview map |
 |
FUrl |
url to the map server |
 |
FVersion |
version of the map server |
Methods
Overview
Description
 |
constructor Create(AOwner: TComponent); override; |
creator
 |
destructor Destroy; override; |
destructor
 |
procedure ExecInfoRequest; virtual; abstract; |
executes the info request (InfoRequest
), result in Info
 |
procedure ExecMapRequest; virtual; abstract; |
executes the map request (MapRequest
), result in Map
 |
procedure ExecOverviewMapRequest; virtual; abstract; |
executes the legend request (OverviewMapRequest
), result in OverviewMap
 |
procedure GetInfo(posX, posY: Integer); |
executes the two procedures GetInfoRequest
and ExecInfoRequest
: result as TStrings in Info
; posX, posY: mouse column, row (from left, top)
 |
procedure GetInfoRequest(posX, posY: Integer); virtual; abstract; |
generates a info request with the same properties as defined in GetMapRequest
and additional properties; posX, posY: mouse column, row (from left, top)
 |
procedure GetMap; |
executes the two procedures GetMapRequest
and ExecMapRequest
: result as TBitmap in Map
 |
procedure GetMapRequest; virtual; abstract; |
generates a map request with the properties
 |
procedure GetOverviewMap; |
executes the two procedures GetOverviewMapRequest
and ExecOverviewMapRequest
: result as TBitmap in OverviewMap
 |
procedure GetOverviewMapRequest; virtual; abstract; |
generates a legend request
 |
function GetUrlForRequest(url: String): String; |
adds a need '?' or '&' to a URL
Properties
Overview
Description
 |
property ImageHeight: Integer; |
image height for the map, info request
 |
property ImageWidth: Integer; |
image width for the map, info request
 |
property Info: TStrings; |
result of the info request (after calling ExecInfoRequest
or GetInfo
) (readonly)
 |
property InfoLayers: String; |
comma separated list of layers for the info request (query layers have to be also defined in Layers
)
 |
property InfoRequest: String; |
auto. generated info request (without url, generated with GetInfoRequest
)
 |
property Layers: String; |
comma separated list of layers for the map, info request (no spaces!)
 |
property Map: TBitMap; |
the result of a ExecMapRequest
or GetMap
(readonly)
 |
property MapRequest: String; |
auto. generated map request (generated with GetInfoRequest
)
 |
property MaxX: Double; |
max. longitude coordinate for the map, info request
 |
property MaxY: Double; |
max. latitude coordinate for the map, info request
 |
property MinX: Double; |
min. longitude coordinate for the map, info request
 |
property MinY: Double; |
min. longatitude coordinate for the map, info request
 |
property OverviewMap: TBitmap; |
result of the legend request (after calling ExecOverviewMapRequest
or GetOverviewMap
) (readonly)
 |
property OverviewMapRequest: String; |
auto. generated overview map request (generated with GetOverviewMapRequest
)
 |
property Url: String; |
Base URL to the map server
 |
property Version: String; |
version of the map server
Generated by PasDoc 0.8.7 on Mon 17. Nov 2003 13:31:10