-
Notifications
You must be signed in to change notification settings - Fork 2
/
GResource.pas
104 lines (86 loc) · 4 KB
/
GResource.pas
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
unit GResource;
interface
resourcestring
{$DEFINE TG_ENGLISH}
{-$DEFINE TG_TAIWAN}
{-$DEFINE TG_SPANISH}
{$IFDEF TG_ENGLISH}
rsStrToLLMsg = 'StrToLL: format error';
rsEStrToUnitsMsg = 'StrToUnits: Unknown Unit %s';
rsEFileNotFoundMsg = 'File %s not found';
rsEDataFileVersionMsg = 'Invalid File Version %X in %s';
rsEGlobeTextureMsg = 'Globe texture must be a 256 color RGB encoded bitmap';
rsEConversionError = 'StrToExtended: Conversion failed for %s';
rsEClassRegisteredMsg = 'TGlobe5.RegisterGlobeClass: Class %s already registered';
rsEBadLayerIndexMsg = 'TGlobe5.GetLayer: Bad layer index %d';
rsEBadProjectionClassMsg = 'Class %s does not inherit from TProjectionModel';
rsEGlobeBadObjectMsg = 'TGlobeReader returned nil object';
rsEGlobeBadMethodMsg = 'Method %s not defined for %s';
rsMapping = 'Mapping';
rsFinished = 'Finished';
rsMIFImportError = 'MIF Import only supports Lat/Long tables.';
rsNewObject = 'New Object';
rsNewPolygon = 'New Polygon';
rsNewPolyline = 'New Polyline';
rsPointPresenterName = 'Point Presenter';
rsPolyPresenterName = 'Poly Presenter';
rsPolygonPresenterName = 'Polygon Presenter';
rsPolylinePresenterName = 'Polyline Presenter';
rsOpenError = 'Unable to open file %s';
rsFileMappingCreateError = 'Unable to create file mapping';
rsFileMappingViewError = 'Unable to map view of file';
{$ENDIF}
{$IFDEF TG_TAIWAN}
rsStrToLLMsg = 'StrToLL: format error';
rsEStrToUnitsMsg = 'StrToUnits: Unknown Unit %s';
rsEGlobeTextureMsg = 'Globe texture must be a 256 color RGB encoded bitmap';
rsEFileNotFoundMsg = '檔案 %s 不存在';
rsEDataFileVersionMsg = '欞~的檔案版本 %X 於 %s';
rsEConversionError = 'StrToExtended: Conversion failed for %s';
rsEClassRegisteredMsg = 'TGlobe5.RegisterGlobeClass: Class %s already registered';
rsEBadLayerIndexMsg = 'TGlobe5.GetLayer: Bad layer index %d';
rsEBadProjectionClassMsg = 'Class %s does not inherit from TProjectionModel';
rsEGlobeBadObjectMsg = 'TGlobeReader returned nil object';
rsEGlobeBadMethodMsg = 'Method %s not defined for %s';
rsMapping = 'Mapping';
rsFinished = 'Finished';
rsMIFImportError = 'MIF Import only supports Lat/Long tables.';
rsNewObject = 'New Object';
rsNewPolygon = 'New Polygon';
rsNewPolyline = 'New Polyline';
rsPointPresenterName = 'Point Presenter';
rsPolyPresenterName = 'Poly Presenter';
rsPolygonPresenterName = 'Polygon Presenter';
rsPolylinePresenterName = 'Polyline Presenter';
rsOpenError = 'Unable to open file %s';
rsFileMappingCreateError = 'Unable to create file mapping';
rsFileMappingViewError = 'Unable to map view of file';
{$ENDIF}
{$IFDEF TG_SPANISH}
rsStrToLLMsg = 'StrToLL: Error de formato';
rsEStrToUnitsMsg = 'StrToUnits: Unidad ''%s'' desconocida';
rsEFileNotFoundMsg = 'Archivo ''%s'' no encontrado';
rsEDataFileVersionMsg = 'Versi鏮 de Archivo Inv嫮ida %X en ''%s''';
rsEGlobeTextureMsg = 'La textura debe ser de un bitmap RGB de 256 colores';
rsEConversionError = 'StrToExtended: Fallo de conversi鏮 para ''%s''';
rsEClassRegisteredMsg = 'TGlobe5.RegisterGlobeClass: Clase ''%s'' ya registrada';
rsEBadLayerIndexMsg = 'TGlobe5.GetLayer: 瓝dice de capa %d incorrecto';
rsEBadProjectionClassMsg = 'La clase ''%s'' no hereda de TProjectionModel';
rsEGlobeBadObjectMsg = 'TGlobeReader retorna objecto nulo';
rsEGlobeBadMethodMsg = 'M彋odo ''%s'' no definido para ''%s''';
rsMapping = 'Mapeando';
rsFinished = 'Finalizado';
rsMIFImportError = 'Importaci鏮 de MIF s鏊o soporta tablas de Lat/Long.';
rsNewObject = 'Nuevo Objeto';
rsNewPolygon = 'Nuevo Pol璲ono';
rsNewPolyline = 'Nueva Polil璯ea';
rsPointPresenterName = 'Presentador de Puntos';
rsPolyPresenterName = 'Presentador de Poliobjetos';
rsPolygonPresenterName = 'Presentador de Pol璲onos';
rsPolylinePresenterName = 'Presentador de Polil璯eas';
rsOpenError = 'Imposible abrir %s';
rsFileMappingCreateError = 'No se puede crear archivo de mapeado';
rsFileMappingViewError = 'No se puede mapear la vista del archivo';
{$ENDIF}
implementation
end.