mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-12 19:49:31 +02:00
* Patch from Ondrej Pokorny to convert unit names to CamelCase (bug ID 33481)
git-svn-id: trunk@38616 -
This commit is contained in:
michael
parent
881288f991
commit
16ba47be46
@ -1,6 +1,6 @@
|
||||
{
|
||||
}
|
||||
unit wincd;
|
||||
unit WinCD;
|
||||
|
||||
{$mode objfpc}
|
||||
{$h+}
|
||||
|
||||
@ -25,7 +25,7 @@
|
||||
7.4 - MS SQL Server 2012/2014
|
||||
tds version can be set using env.var. TDSVER or in freetds.conf or .freetds.conf
|
||||
}
|
||||
unit dblib;
|
||||
unit DBLib;
|
||||
|
||||
{$IFDEF FPC}{$mode objfpc}{$ENDIF}{$H+}
|
||||
|
||||
|
||||
@ -16,7 +16,7 @@
|
||||
{$H+}
|
||||
{$ifdef CLASSESINLINE}{$inline on}{$endif}
|
||||
|
||||
unit contnrs;
|
||||
unit Contnrs;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
|
||||
**********************************************************************}
|
||||
|
||||
unit fileinfo;
|
||||
unit FileInfo;
|
||||
|
||||
{$mode objfpc}
|
||||
{$h+}
|
||||
|
||||
@ -19,7 +19,7 @@
|
||||
}
|
||||
|
||||
|
||||
unit maskutils;
|
||||
unit MaskUtils;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
{.$define debug_maskutils}
|
||||
|
||||
@ -29,7 +29,7 @@
|
||||
|
||||
{$mode objfpc}
|
||||
{$H+}
|
||||
unit rttiutils;
|
||||
unit RttiUtils;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -14,7 +14,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit db;
|
||||
unit DB;
|
||||
|
||||
{$mode objfpc}
|
||||
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit dbcoll;
|
||||
unit DBColl;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -14,7 +14,7 @@
|
||||
|
||||
**********************************************************************}
|
||||
|
||||
unit dbconst;
|
||||
unit DBConst;
|
||||
|
||||
Interface
|
||||
|
||||
|
||||
@ -12,7 +12,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit sqlscript;
|
||||
unit SQLScript;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit sqltypes;
|
||||
unit SQLTypes;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit fpddcodegen;
|
||||
unit FPDDCodeGen;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit fpddpopcode;
|
||||
unit FPDDPopCode;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit fpddDbf;
|
||||
unit FPDDDBF;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -12,7 +12,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit fpdddiff;
|
||||
unit FPDDDiff;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit fpddfb;
|
||||
unit FPDDFB;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit fpddmssql;
|
||||
unit FPDDMSSQL;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit fpddmysql40;
|
||||
unit FPDDMySQL40;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit fpddmysql41;
|
||||
unit FPDDMySQL41;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit fpddmysql50;
|
||||
unit FPDDMySQL50;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit fpddmysql51;
|
||||
unit FPDDMySQL51;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit fpddmysql55;
|
||||
unit FPDDMySQL55;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit fpddodbc;
|
||||
unit FPDDODBC;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -14,7 +14,7 @@
|
||||
|
||||
**********************************************************************}
|
||||
|
||||
unit fpddoracle;
|
||||
unit FPDDOracle;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit fpddpq;
|
||||
unit FPDDPQ;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -25,7 +25,7 @@
|
||||
are registered.
|
||||
|
||||
}
|
||||
unit fpddregstd;
|
||||
unit FPDDRegStd;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit fpddsqldb;
|
||||
unit FPDDSQLDB;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit fpddsqlite3;
|
||||
unit FPDDSQLite3;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -34,7 +34,7 @@
|
||||
"TextSize=16777216" - set maximum size of text/image data returned
|
||||
"ApplicationName=YourAppName" - Set the app name for the connection. MSSQL 2000 and higher only
|
||||
}
|
||||
unit mssqlconn;
|
||||
unit MSSQLConn;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit pqconnection;
|
||||
unit PQConnection;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -12,7 +12,7 @@
|
||||
|
||||
**********************************************************************}
|
||||
|
||||
unit sqldb;
|
||||
unit SQLDB;
|
||||
|
||||
{$mode objfpc}
|
||||
{$H+}
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit sqldblib;
|
||||
unit SQLDBLib;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit sqlite3backup;
|
||||
unit SQLite3Backup;
|
||||
|
||||
{ SQLite3 backup class.
|
||||
|
||||
|
||||
@ -23,7 +23,7 @@
|
||||
|
||||
}
|
||||
|
||||
unit sqlite3conn;
|
||||
unit SQLite3Conn;
|
||||
{$mode objfpc}
|
||||
{$h+}
|
||||
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit CustomSqliteDS;
|
||||
unit CustomSQLiteDS;
|
||||
|
||||
{
|
||||
This is TCustomSqliteDataset, a TDataset descendant class for use with fpc compiler
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit Sqlite3DS;
|
||||
unit SQLite3DS;
|
||||
|
||||
{
|
||||
This is TSqlite3Dataset, a TDataset descendant class for use with fpc compiler
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit SqliteDS;
|
||||
unit SQLiteDS;
|
||||
|
||||
{
|
||||
This is TSqliteDataset, a TDataset descendant class for use with fpc compiler
|
||||
|
||||
@ -2,7 +2,7 @@
|
||||
This file is part of the Free Pascal run time library.
|
||||
Copyright (c) 2003 by the Free Pascal development team
|
||||
|
||||
fpImage base definitions.
|
||||
FPImage base definitions.
|
||||
|
||||
See the file COPYING.FPC, included in this distribution,
|
||||
for details about the copyright.
|
||||
@ -13,7 +13,7 @@
|
||||
|
||||
**********************************************************************}
|
||||
{$mode objfpc}{$h+}
|
||||
unit FPimage;
|
||||
unit FPImage;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit fpimgbarcode;
|
||||
unit FPImgBarCode;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -12,7 +12,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit fpimgqrcode;
|
||||
unit FPImgQRCode;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -17,7 +17,7 @@
|
||||
https://www.nayuki.io/page/qr-code-generator-library
|
||||
**********************************************************************}
|
||||
{$mode objfpc}
|
||||
unit fpqrcodegen;
|
||||
unit FPQRCodeGen;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
|
||||
**********************************************************************}
|
||||
{$mode objfpc}{$h+}
|
||||
unit PNGcomn;
|
||||
unit PNGComn;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
Unit registry;
|
||||
Unit Registry;
|
||||
|
||||
{$mode objfpc}
|
||||
{$H+}
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit sqldbwebdata;
|
||||
unit SQLDBWebData;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
|
||||
**********************************************************************}
|
||||
|
||||
unit dbIndexer;
|
||||
unit DBIndexer;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
|
||||
**********************************************************************}
|
||||
|
||||
unit fpIndexer;
|
||||
unit FPIndexer;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -19,7 +19,7 @@
|
||||
* *
|
||||
*****************************************************************************
|
||||
}
|
||||
unit fpmasks;
|
||||
unit FPMasks;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
@ -19,7 +19,7 @@
|
||||
MA 02110-1301, USA.
|
||||
|
||||
****************************************************************************}
|
||||
Unit sysmsg;
|
||||
Unit SysMsg;
|
||||
|
||||
interface
|
||||
{$i platform.inc}
|
||||
|
||||
@ -14,7 +14,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit wincrt;
|
||||
unit WinCRT;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -14,7 +14,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit winmouse;
|
||||
unit WinMouse;
|
||||
|
||||
interface
|
||||
{ initializes the mouse with the default values for the current screen mode }
|
||||
|
||||
@ -1,7 +1,7 @@
|
||||
{$ifndef NO_SMART_LINK}
|
||||
{$smartlink on}
|
||||
{$endif}
|
||||
unit png;
|
||||
unit PNG;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit paszlib;
|
||||
unit PasZLib;
|
||||
|
||||
{$inline on}
|
||||
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit trees;
|
||||
unit Trees;
|
||||
|
||||
{$T-}
|
||||
{$define ORG_DEBUG}
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit zbase;
|
||||
unit ZBase;
|
||||
|
||||
|
||||
{ Original:
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
Unit zCompres;
|
||||
Unit ZCompres;
|
||||
|
||||
{ compress.c -- compress a memory buffer
|
||||
Copyright (C) 1995-1998 Jean-loup Gailly.
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit zdeflate;
|
||||
unit ZDeflate;
|
||||
|
||||
{$goto on}
|
||||
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit zinflate;
|
||||
unit ZInflate;
|
||||
|
||||
{ inflate.c -- zlib interface to inflate modules
|
||||
Copyright (C) 1995-1998 Mark Adler
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit zip;
|
||||
unit Zip;
|
||||
|
||||
{ zip.c -- IO on .zip files using zlib
|
||||
zip.h -- IO for compress .zip files using zlib
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
**********************************************************************}
|
||||
{$mode objfpc}
|
||||
{$h+}
|
||||
unit zipper;
|
||||
unit Zipper;
|
||||
|
||||
Interface
|
||||
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit ziputils;
|
||||
unit ZipUtils;
|
||||
|
||||
{ ziputils.pas - IO on .zip files using zlib
|
||||
- definitions, declarations and routines used by both
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit zstream;
|
||||
unit ZStream;
|
||||
|
||||
{**********************************************************************
|
||||
This file is part of the Free Pascal free component library.
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit zuncompr;
|
||||
unit ZUncompr;
|
||||
|
||||
{ uncompr.c -- decompress a memory buffer
|
||||
Copyright (C) 1995-1998 Jean-loup Gailly.
|
||||
|
||||
@ -19,7 +19,7 @@
|
||||
{$endif}
|
||||
{$mode fpc}
|
||||
|
||||
unit winsock;
|
||||
unit WinSock;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -3,7 +3,7 @@
|
||||
Copyright (c) 2004 by Marco van de Voort
|
||||
member of the Free Pascal development team.
|
||||
|
||||
An implementation for unit convutils, which converts between
|
||||
An implementation for unit ConvUtils, which converts between
|
||||
units and simple combinations of them.
|
||||
|
||||
Based on a guessed interface derived from some programs on the web. (Like
|
||||
@ -18,7 +18,7 @@
|
||||
|
||||
**********************************************************************}
|
||||
|
||||
unit convutils;
|
||||
unit ConvUtils;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -15,7 +15,7 @@
|
||||
|
||||
**********************************************************************}
|
||||
|
||||
unit dateutils;
|
||||
unit DateUtils;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -15,7 +15,7 @@
|
||||
|
||||
**********************************************************************}
|
||||
|
||||
unit stdconvs;
|
||||
unit StdConvs;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -15,7 +15,7 @@
|
||||
{$mode objfpc}
|
||||
{$h+}
|
||||
{$inline on}
|
||||
unit strutils;
|
||||
unit StrUtils;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -23,7 +23,7 @@
|
||||
{$inline on}
|
||||
{$define VARIANTINLINE}
|
||||
|
||||
unit variants;
|
||||
unit Variants;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -19,7 +19,7 @@
|
||||
{$smartlink on}
|
||||
{$endif}
|
||||
|
||||
Unit varutils;
|
||||
Unit VarUtils;
|
||||
|
||||
Interface
|
||||
|
||||
|
||||
@ -4,7 +4,7 @@
|
||||
{$linklib c}
|
||||
{$endif}
|
||||
|
||||
unit sqlite;
|
||||
unit SQLite;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit sqlite3;
|
||||
unit SQLite3;
|
||||
|
||||
{$i sqlite3.inc}
|
||||
|
||||
|
||||
@ -6,7 +6,7 @@ O. Rinaudo - 2005 - orinaudo@gmail.com
|
||||
G. Marcou - 2007 - g.marcou@chimie.u-strasbg.fr
|
||||
*************************************************************}
|
||||
|
||||
unit SQLite3db;
|
||||
unit SQLite3DB;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit sqlite3dyn;
|
||||
unit SQLite3Dyn;
|
||||
|
||||
{$DEFINE LOAD_DYNAMICALLY}
|
||||
|
||||
|
||||
@ -1,7 +1,7 @@
|
||||
{$mode objfpc}
|
||||
{$h+}
|
||||
|
||||
unit SQLitedb;
|
||||
unit SQLiteDB;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -1,6 +1,6 @@
|
||||
{
|
||||
}
|
||||
UNIT ziptypes;
|
||||
UNIT ZipTypes;
|
||||
{
|
||||
Type definitions for UNZIP
|
||||
* original version by Christian Ghisler
|
||||
|
||||
@ -14,7 +14,7 @@
|
||||
{$mode objfpc}
|
||||
{$H+}
|
||||
{$inline on}
|
||||
unit comconst;
|
||||
unit ComConst;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
Note these functions were in the windows unit in older versions
|
||||
|
||||
**********************************************************************}
|
||||
unit commdlg;
|
||||
unit CommDlg;
|
||||
|
||||
interface
|
||||
{$mode delphi} // interface
|
||||
|
||||
@ -14,7 +14,7 @@
|
||||
{$mode objfpc}
|
||||
{$H+}
|
||||
{$inline on}
|
||||
unit comobj;
|
||||
unit ComObj;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -14,7 +14,7 @@
|
||||
{$mode objfpc}
|
||||
{$H+}
|
||||
{$inline on}
|
||||
unit comserv;
|
||||
unit ComServ;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -6,7 +6,7 @@
|
||||
{*********************************} (* LCC-win32 (c) Jacob Navia *)
|
||||
(*********************************)
|
||||
|
||||
Unit mmsystem;
|
||||
Unit MMSystem;
|
||||
{$ifndef NO_SMART_LINK}
|
||||
{$smartlink on}
|
||||
{$endif}
|
||||
|
||||
@ -13,7 +13,7 @@
|
||||
|
||||
**********************************************************************}
|
||||
{$MODE OBJFPC}
|
||||
unit ole2;
|
||||
unit Ole2;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -1,5 +1,5 @@
|
||||
{ Converted by H2Pas from richedit.h }
|
||||
unit richedit;
|
||||
unit RichEdit;
|
||||
|
||||
{$mode objfpc}
|
||||
{$calling stdcall}
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
Unit stdole2;
|
||||
Unit StdOle2;
|
||||
|
||||
// Imported on 24/12/2011 13:43:11 from C:\WINDOWS\system32\stdole2.tlb
|
||||
// Modified by Ludo Brands to remove redeclarations
|
||||
|
||||
@ -23,7 +23,7 @@ Abstract:
|
||||
Contains manifests, macros, types and prototypes for Windows HTTP Services
|
||||
|
||||
}
|
||||
unit winhttp;
|
||||
unit WinHTTP;
|
||||
interface
|
||||
|
||||
uses windows;
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit wininet;
|
||||
unit WinINet;
|
||||
//+-------------------------------------------------------------------------
|
||||
//
|
||||
// Microsoft Windows
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit winspool;
|
||||
unit Winspool;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -14,7 +14,7 @@
|
||||
**********************************************************************}
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
unit winutils;
|
||||
unit WinUtils;
|
||||
|
||||
Interface
|
||||
|
||||
|
||||
@ -14,7 +14,7 @@
|
||||
**********************************************************************}
|
||||
|
||||
{$mode objfpc}
|
||||
unit winver;
|
||||
unit WinVer;
|
||||
|
||||
Interface
|
||||
|
||||
|
||||
@ -1,7 +1,7 @@
|
||||
{$ifndef NO_SMART_LINK}
|
||||
{$smartlink on}
|
||||
{$endif}
|
||||
unit zlib;
|
||||
unit ZLib;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -12,7 +12,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit strings;
|
||||
unit Strings;
|
||||
{$S-}
|
||||
{$inline on}
|
||||
interface
|
||||
|
||||
@ -211,25 +211,25 @@ begin
|
||||
CurrentTM.InitCriticalSection(cs);
|
||||
end;
|
||||
|
||||
procedure DoneCriticalsection(var cs : TRTLCriticalSection);
|
||||
procedure DoneCriticalSection(var cs : TRTLCriticalSection);
|
||||
|
||||
begin
|
||||
CurrentTM.DoneCriticalSection(cs);
|
||||
end;
|
||||
|
||||
procedure EnterCriticalsection(var cs : TRTLCriticalSection);
|
||||
procedure EnterCriticalSection(var cs : TRTLCriticalSection);
|
||||
|
||||
begin
|
||||
CurrentTM.EnterCriticalSection(cs);
|
||||
end;
|
||||
|
||||
function TryEnterCriticalsection(var cs : TRTLCriticalSection):longint;
|
||||
function TryEnterCriticalSection(var cs : TRTLCriticalSection):longint;
|
||||
|
||||
begin
|
||||
result:=CurrentTM.TryEnterCriticalSection(cs);
|
||||
end;
|
||||
|
||||
procedure LeaveCriticalsection(var cs : TRTLCriticalSection);
|
||||
procedure LeaveCriticalSection(var cs : TRTLCriticalSection);
|
||||
|
||||
begin
|
||||
CurrentTM.LeaveCriticalSection(cs);
|
||||
|
||||
@ -153,10 +153,10 @@ function GetCurrentThreadId : TThreadID;
|
||||
{ it is also used to make the heap management }
|
||||
{ thread safe }
|
||||
procedure InitCriticalSection(var cs : TRTLCriticalSection);
|
||||
procedure DoneCriticalsection(var cs : TRTLCriticalSection);
|
||||
procedure EnterCriticalsection(var cs : TRTLCriticalSection);
|
||||
procedure LeaveCriticalsection(var cs : TRTLCriticalSection);
|
||||
function TryEnterCriticalsection(var cs : TRTLCriticalSection):longint;
|
||||
procedure DoneCriticalSection(var cs : TRTLCriticalSection);
|
||||
procedure EnterCriticalSection(var cs : TRTLCriticalSection);
|
||||
procedure LeaveCriticalSection(var cs : TRTLCriticalSection);
|
||||
function TryEnterCriticalSection(var cs : TRTLCriticalSection):longint;
|
||||
function BasicEventCreate(EventAttributes : Pointer; AManualReset,InitialState : Boolean;const Name : ansistring):pEventState;
|
||||
procedure basiceventdestroy(state:peventstate);
|
||||
procedure basiceventResetEvent(state:peventstate);
|
||||
|
||||
@ -64,7 +64,7 @@
|
||||
packed
|
||||
{$endif FPC_REQUIRES_PROPER_ALIGNMENT}
|
||||
record
|
||||
x : Longint; y : Longint;
|
||||
X : Longint; Y : Longint;
|
||||
public
|
||||
{$ifdef VER3}
|
||||
constructor Create(ax,ay:Longint); overload;
|
||||
|
||||
@ -17,7 +17,7 @@
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. }
|
||||
unit character;
|
||||
unit Character;
|
||||
|
||||
interface
|
||||
{$ifndef VER2_4}
|
||||
|
||||
@ -36,7 +36,7 @@
|
||||
3. This notice may not be removed or altered from any source distribution.
|
||||
----------------------------------------------------------------------------}
|
||||
{
|
||||
This unit is an equivalent to the Delphi math unit
|
||||
This unit is an equivalent to the Delphi Math unit
|
||||
(with some improvements)
|
||||
|
||||
What's to do:
|
||||
@ -47,7 +47,7 @@
|
||||
{$MODE objfpc}
|
||||
{$inline on }
|
||||
{$GOTO on}
|
||||
unit math;
|
||||
unit Math;
|
||||
interface
|
||||
|
||||
|
||||
|
||||
@ -12,7 +12,7 @@
|
||||
|
||||
**********************************************************************}
|
||||
{$mode objfpc}
|
||||
unit sysconst;
|
||||
unit SysConst;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -16,7 +16,7 @@
|
||||
{ This unit provides the same Functionality as the TypInfo Unit }
|
||||
{ of Delphi }
|
||||
|
||||
unit typinfo;
|
||||
unit TypInfo;
|
||||
|
||||
interface
|
||||
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit messages;
|
||||
unit Messages;
|
||||
|
||||
|
||||
interface
|
||||
|
||||
@ -4,7 +4,7 @@
|
||||
Copyright (c) 1999-2000 by Florian Klaempfl
|
||||
member of the Free Pascal development team
|
||||
|
||||
Sysutils unit for win32
|
||||
SysUtils unit for win32
|
||||
|
||||
See the file COPYING.FPC, included in this distribution,
|
||||
for details about the copyright.
|
||||
@ -14,7 +14,7 @@
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
unit sysutils;
|
||||
unit SysUtils;
|
||||
interface
|
||||
|
||||
{$MODE objfpc}
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
unit windirs;
|
||||
unit WinDirs;
|
||||
|
||||
{*******************************************************************************
|
||||
|
||||
|
||||
Some files were not shown because too many files have changed in this diff Show More
Loading…
Reference in New Issue
Block a user