← Back to branch summary

~ubuntu-branches/debian/lenny/fpc/lenny

« back to all changes in this revision

Viewing changes to fpcsrc/packages/base/winunits/jediapilib.inc

  • Committer: Bazaar Package Importer
  • Author(s): Mazen Neifer, Torsten Werner, Mazen Neifer
  • Date: 2008-05-17 17:12:11 UTC
  • mfrom: (3.1.9 intrepid)
  • Revision ID: james.westby@ubuntu.com-20080517171211-9qi33xhd9evfa0kg
Tags: 2.2.0-dfsg1-9
http://bugs.debian.org/477743
[ Torsten Werner ]
* Add Mazen Neifer to Uploaders field.

[ Mazen Neifer ]
* Moved FPC sources into a version dependent directory from /usr/share/fpcsrc
  to /usr/share/fpcsrc/${FPCVERSION}. This allow installing more than on FPC
  release.
* Fixed far call issue in compiler preventing building huge binearies.
  (closes: #477743)
* Updated building dependencies, recomennded and suggested packages.
* Moved fppkg to fp-utils as it is just a helper tool and is not required by
  compiler.

Show diffs side-by-side

added added

removed removed

Lines of Context:
fpcsrc/packages/base/winunits/jediapilib.inc
 
1
{$IFNDEF JEDIAPILIB_INC}
 
2
{$DEFINE JEDIAPILIB_INC}
 
3
 
 
4
{******************************************************************************}
 
5
{                                                                              }
 
6
{ Windows Version Unit for Object Pascal                                       }
 
7
{                                                                              }
 
8
{ Portions created by Robert Marquardt are Copyright (C) 2004                  }
 
9
{ Robert Marquardt. All Rights Reserved.                                       }
 
10
{                                                                              }
 
11
{ Obtained through: Joint Endeavour of Delphi Innovators (Project JEDI)        }
 
12
{                                                                              }
 
13
{ You may retrieve the latest version of this file at the Project JEDI         }
 
14
{ APILIB home page, located at http://jedi-apilib.sourceforge.net              }
 
15
{                                                                              }
 
16
{ The contents of this file are used with permission, subject to the Mozilla   }
 
17
{ Public License Version 1.1 (the "License"); you may not use this file except }
 
18
{ in compliance with the License. You may obtain a copy of the License at      }
 
19
{ http://www.mozilla.org/MPL/MPL-1.1.html                                      }
 
20
{                                                                              }
 
21
{ Software distributed under the License is distributed on an "AS IS" basis,   }
 
22
{ WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for }
 
23
{ the specific language governing rights and limitations under the License.    }
 
24
{                                                                              }
 
25
{ Alternatively, the contents of this file may be used under the terms of the  }
 
26
{ GNU Lesser General Public License (the  "LGPL License"), in which case the   }
 
27
{ provisions of the LGPL License are applicable instead of those above.        }
 
28
{ If you wish to allow use of your version of this file only under the terms   }
 
29
{ of the LGPL License and not to allow others to use your version of this file }
 
30
{ under the MPL, indicate your decision by deleting the provisions above and   }
 
31
{ replace them with the notice and other provisions required by the LGPL       }
 
32
{ License. If you do not delete the provisions above, a recipient may use      }
 
33
{ your version of this file under either the MPL or the LGPL License.          }
 
34
{                                                                              }
 
35
{ For more information about the LGPL: http://www.gnu.org/copyleft/lesser.html }
 
36
{                                                                              }
 
37
{******************************************************************************}
 
38
{$A+,Z4}
 
39
 
 
40
// This file is intended for C header conversions.
 
41
// It defines several mutually exclusive IFDEFs which determine
 
42
// the Windows version the API conversion is usable with.
 
43
 
 
44
{$I jedi.inc}
 
45
 
 
46
{$IFNDEF JEDI_INC}
 
47
ALERT_jedi_inc_incompatible
 
48
// secure against old versions of jedi.inc.
 
49
{$ENDIF !JEDI_INC}
 
50
 
 
51
// activate standalone feature for files
 
52
{$IFNDEF JWA_INCLUDEMODE}
 
53
{$DEFINE JWA_INTERFACESECTION}
 
54
{$DEFINE JWA_IMPLEMENTATIONSECTION}
 
55
{$ENDIF !JWA_INCLUDEMODE}
 
56
 
 
57
// Global switch to enable dynamic linking of some APIs
 
58
{.DEFINE DYNAMIC_LINK}
 
59
{$IFDEF DYNAMIC_LINK}
 
60
  {$STACKFRAMES ON}
 
61
  {$WARNINGS OFF}
 
62
{$ENDIF DYNAMIC_LINK}
 
63
 
 
64
// Global switch to make UNICODE versions of API functions default
 
65
{.DEFINE UNICODE}
 
66
 
 
67
// Global switch to activate the use of the original basic types of
 
68
// Delphi Windows.pas. Either indirectly in JwaWinType.pas or
 
69
// directly through the use of Windows.pas instead of JwaWinType.pas.
 
70
{$DEFINE USE_DELPHI_TYPES}
 
71
 
 
72
// Global switch for the Windows version the files are compatible with
 
73
// ONLY A SINGLE ONE IS ALLOWED TO BE ACTIVATED BY CHANGING THE DOT TO A DOLLAR SIGN!
 
74
// Default is WINXP
 
75
{.DEFINE WIN95}
 
76
{.DEFINE WIN98}
 
77
{.DEFINE WIN98SE}
 
78
{.DEFINE WIN98ME}
 
79
{.DEFINE WINNT4}
 
80
{.DEFINE WIN2000}
 
81
{$DEFINE WINXP}
 
82
{.DEFINE WIN2003}
 
83
 
 
84
// Global switch for the Windows Internet Explorer versions
 
85
// ONLY A SINGLE ONE IS ALLOWED TO BE ACTIVATED BY CHANGING THE DOT TO A DOLLAR SIGN!
 
86
// Default is IE600
 
87
{.DEFINE IE300}
 
88
{.DEFINE IE400}
 
89
{.DEFINE IE401}
 
90
{.DEFINE IE500}
 
91
{.DEFINE IE501}
 
92
{.DEFINE IE560}
 
93
{$DEFINE IE600}
 
94
 
 
95
// Global switch for the MSI (Microsoft Installer) versions
 
96
// ONLY A SINGLE ONE IS ALLOWED TO BE ACTIVATED BY CHANGING THE DOT TO A DOLLAR SIGN!
 
97
// if none is set a default is determined from the Windows version IFDEFs
 
98
{.DEFINE MSI100}
 
99
{.DEFINE MSI110}
 
100
{.DEFINE MSI200}
 
101
 
 
102
// Global switch for the HtmlHelp versions
 
103
// ONLY A SINGLE ONE IS ALLOWED TO BE ACTIVATED BY CHANGING THE DOT TO A DOLLAR SIGN!
 
104
// default is HTMLHELP12
 
105
{.DEFINE HTMLHELP11}
 
106
{$DEFINE HTMLHELP12}
 
107
 
 
108
// secondary IFDEFs for "_UP" which means also any later OS version
 
109
{$IFDEF WIN2003}
 
110
 {$DEFINE WIN95_UP}
 
111
 {$DEFINE WIN98_UP}
 
112
 {$DEFINE WIN98SE_UP}
 
113
 {$DEFINE WIN98ME_UP}
 
114
 {$DEFINE WINNT4_UP}
 
115
 {$DEFINE WIN2000_UP}
 
116
 {$DEFINE WINXP_UP}
 
117
 {$DEFINE WIN2003_UP}
 
118
{$ENDIF WIN2003}
 
119
 
 
120
{$IFDEF WINXP}
 
121
 {$DEFINE WIN95_UP}
 
122
 {$DEFINE WIN98_UP}
 
123
 {$DEFINE WIN98SE_UP}
 
124
 {$DEFINE WIN98ME_UP}
 
125
 {$DEFINE WINNT4_UP}
 
126
 {$DEFINE WIN2000_UP}
 
127
 {$DEFINE WINXP_UP}
 
128
{$ENDIF WINXP}
 
129
 
 
130
{$IFDEF WIN2000}
 
131
 {$DEFINE WIN95_UP}
 
132
 {$DEFINE WIN98_UP}
 
133
 {$DEFINE WIN98SE_UP}
 
134
 {$DEFINE WIN98ME_UP}
 
135
 {$DEFINE WINNT4_UP}
 
136
 {$DEFINE WIN2000_UP}
 
137
{$ENDIF WIN2000}
 
138
 
 
139
{$IFDEF WINNT4}
 
140
 {$DEFINE WIN95_UP}
 
141
 {$DEFINE WIN98_UP}
 
142
 {$DEFINE WIN98SE_UP}
 
143
 {$DEFINE WIN98ME_UP}
 
144
 {$DEFINE WINNT4_UP}
 
145
{$ENDIF WINNT4}
 
146
 
 
147
{$IFDEF WIN98ME}
 
148
 {$DEFINE WIN95_UP}
 
149
 {$DEFINE WIN98_UP}
 
150
 {$DEFINE WIN98SE_UP}
 
151
 {$DEFINE WIN98ME_UP}
 
152
{$ENDIF WIN98ME}
 
153
 
 
154
{$IFDEF WIN98SE}
 
155
 {$DEFINE WIN95_UP}
 
156
 {$DEFINE WIN98_UP}
 
157
 {$DEFINE WIN98SE_UP}
 
158
{$ENDIF WIN98SE}
 
159
 
 
160
{$IFDEF WIN98}
 
161
 {$DEFINE WIN95_UP}
 
162
 {$DEFINE WIN98_UP}
 
163
{$ENDIF WIN98}
 
164
 
 
165
{$IFDEF WIN95}
 
166
 {$DEFINE WIN95_UP}
 
167
{$ENDIF WIN95}
 
168
 
 
169
 
 
170
// secondary IFDEFs for "_UP" which means also any later IE version
 
171
{$IFDEF IE600}
 
172
 {$DEFINE IE300_UP}
 
173
 {$DEFINE IE400_UP}
 
174
 {$DEFINE IE401_UP}
 
175
 {$DEFINE IE500_UP}
 
176
 {$DEFINE IE501_UP}
 
177
 {$DEFINE IE560_UP}
 
178
 {$DEFINE IE600_UP}
 
179
{$ENDIF IE600}
 
180
 
 
181
{$IFDEF IE560}
 
182
 {$DEFINE IE300_UP}
 
183
 {$DEFINE IE400_UP}
 
184
 {$DEFINE IE401_UP}
 
185
 {$DEFINE IE500_UP}
 
186
 {$DEFINE IE501_UP}
 
187
 {$DEFINE IE560_UP}
 
188
{$ENDIF IE560}
 
189
 
 
190
{$IFDEF IE501}
 
191
 {$DEFINE IE300_UP}
 
192
 {$DEFINE IE400_UP}
 
193
 {$DEFINE IE401_UP}
 
194
 {$DEFINE IE500_UP}
 
195
 {$DEFINE IE501_UP}
 
196
{$ENDIF IE501}
 
197
 
 
198
{$IFDEF IE500}
 
199
 {$DEFINE IE300_UP}
 
200
 {$DEFINE IE400_UP}
 
201
 {$DEFINE IE401_UP}
 
202
 {$DEFINE IE500_UP}
 
203
{$ENDIF IE500}
 
204
 
 
205
{$IFDEF IE401}
 
206
 {$DEFINE IE300_UP}
 
207
 {$DEFINE IE400_UP}
 
208
 {$DEFINE IE401_UP}
 
209
{$ENDIF IE401}
 
210
 
 
211
{$IFDEF IE400}
 
212
 {$DEFINE IE300_UP}
 
213
 {$DEFINE IE400_UP}
 
214
{$ENDIF IE400}
 
215
 
 
216
{$IFDEF IE300}
 
217
 {$DEFINE IE300_UP}
 
218
{$ENDIF IE300}
 
219
 
 
220
// IFDEF defaults for MSI (Microsoft Installer)
 
221
{$IFNDEF MSI200}
 
222
{$IFNDEF MSI110}
 
223
{$IFNDEF MSI100}
 
224
 {$IFDEF WINXP_UP}
 
225
  {$DEFINE MSI200}
 
226
 {$ELSE}
 
227
  {$IFDEF WIN2000_UP}
 
228
   {$DEFINE MSI110}
 
229
  {$ELSE}
 
230
   {$DEFINE MSI100}
 
231
  {$ENDIF WIN2000_UP}
 
232
 {$ENDIF WINXP_UP}
 
233
{$ENDIF !MSI100}
 
234
{$ENDIF !MSI110}
 
235
{$ENDIF !MSI200}
 
236
 
 
237
// secondary IFDEFs for MSI (Microsoft Installer)
 
238
{$IFDEF MSI200}
 
239
 {$DEFINE MSI200_UP}
 
240
 {$DEFINE MSI110_UP}
 
241
 {$DEFINE MSI100_UP}
 
242
{$ENDIF MSI200}
 
243
 
 
244
{$IFDEF MSI110}
 
245
 {$DEFINE MSI110_UP}
 
246
 {$DEFINE MSI100_UP}
 
247
{$ENDIF MSI110}
 
248
 
 
249
{$IFDEF MSI100}
 
250
 {$DEFINE MSI100_UP}
 
251
{$ENDIF MSI100}
 
252
 
 
253
// secondary IFDEFs for HtmlHelp
 
254
{$IFDEF HTMLHELP12}
 
255
 {$DEFINE HTMLHELP12_UP}
 
256
 {$DEFINE HTMLHELP11_UP}
 
257
{$ENDIF HTMLHELP12}
 
258
 
 
259
{$IFDEF HTMLHELP11}
 
260
 {$DEFINE HTMLHELP11_UP}
 
261
{$ENDIF HTMLHELP11}
 
262
 
 
263
{$ENDIF ~JEDIAPILIB_INC}
 
 
b'\\ No newline at end of file'