Patch for mode delphi from Wimpie Nortje <wimpie@pudu.co.za>

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@734 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
christian_u
2009-03-10 18:38:27 +00:00
parent 7143b44fd1
commit ca65d27b5a
32 changed files with 128 additions and 16 deletions

View File

@@ -77,6 +77,10 @@ driver handling classes (basic audio class)
unit acs_audio; unit acs_audio;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -40,6 +40,10 @@ changed mail adress
{$hints off} {$hints off}
unit acs_audiomix; unit acs_audiomix;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -79,6 +79,10 @@ changed mail adress
unit acs_cdrom; unit acs_cdrom;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -100,6 +100,10 @@ changed mail adress
unit acs_classes; unit acs_classes;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -52,6 +52,10 @@ changed mail adress
unit acs_converters; unit acs_converters;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -65,6 +65,10 @@ this unit introduces basic fileformat support
unit acs_file; unit acs_file;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -34,6 +34,10 @@ changed mail adress
unit acs_filters; unit acs_filters;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -35,6 +35,10 @@ changed mail adress
unit acs_indicator; unit acs_indicator;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -50,6 +50,10 @@ changed mail adress
unit acs_misc; unit acs_misc;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -72,6 +72,10 @@ changed mail adress
unit acs_mixer; unit acs_mixer;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -54,6 +54,10 @@ TMultiMixer by Ross Levis added
{$hints off} {$hints off}
unit acs_multimix; unit acs_multimix;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -28,6 +28,10 @@ changed mail adress
unit acs_procs; unit acs_procs;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -41,6 +41,9 @@ changed mail adress
unit acs_streams; unit acs_streams;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface

View File

@@ -29,6 +29,10 @@ make TAudioIn workable
unit acs_volumequery; unit acs_volumequery;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -75,6 +75,10 @@ changed mail adress
unit acs_stdaudio; unit acs_stdaudio;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -37,6 +37,10 @@ changed mail adress
unit libao; unit libao;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -43,6 +43,10 @@ changed mail adress
unit acs_flac; unit acs_flac;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -46,6 +46,10 @@ changed mail adress
unit acs_lame; unit acs_lame;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -1,5 +1,9 @@
unit acs_mpeg; unit acs_mpeg;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -54,6 +54,10 @@ changed mail adress
unit acs_vorbis; unit acs_vorbis;
{$ifdef fpc}
{$mode delphi}
{$endif}
{$DEFINE USE_VORBIS_11} {$DEFINE USE_VORBIS_11}
interface interface

View File

@@ -60,6 +60,10 @@ changed mail adress
unit acs_wave; unit acs_wave;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -27,6 +27,10 @@ changed mail adress
unit flac; unit flac;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -31,6 +31,10 @@ changed mail adress
unit lame; unit lame;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -30,6 +30,10 @@ changed mail adress
unit mad; unit mad;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -31,6 +31,10 @@ changed mail adress
unit ogg; unit ogg;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -36,6 +36,10 @@ changed mail adress
unit vorbiscodec; unit vorbiscodec;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -32,6 +32,10 @@ changed mail adress
unit vorbisenc; unit vorbisenc;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -43,6 +43,9 @@ changed mail adress
unit vorbisfile; unit vorbisfile;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface

View File

@@ -50,6 +50,10 @@ changed mail adress
unit smpeg; unit smpeg;
{$ifdef fpc}
{$mode delphi}
{$endif}
interface interface
uses uses

View File

@@ -1,9 +1,9 @@
<?xml version="1.0"?> <?xml version="1.0"?>
<CONFIG> <CONFIG>
<Package Version="2"> <Package Version="3">
<Name Value="laz_acs"/> <Name Value="laz_acs"/>
<CompilerOptions> <CompilerOptions>
<Version Value="5"/> <Version Value="8"/>
<SearchPaths> <SearchPaths>
<IncludeFiles Value="../classes/linux/;../fileformats/linux/;../drivers/linux/"/> <IncludeFiles Value="../classes/linux/;../fileformats/linux/;../drivers/linux/"/>
<OtherUnitFiles Value="../classes/;../classes/linux/;../fileformats/;../fileformats/linux/;../fileformats/general/;../drivers/;../drivers/linux/"/> <OtherUnitFiles Value="../classes/;../classes/linux/;../fileformats/;../fileformats/linux/;../fileformats/general/;../drivers/;../drivers/linux/"/>
@@ -11,12 +11,10 @@
</SearchPaths> </SearchPaths>
<Parsing> <Parsing>
<SyntaxOptions> <SyntaxOptions>
<DelphiCompat Value="True"/> <SyntaxMode Value="Delphi"/>
<CStyleOperator Value="False"/>
</SyntaxOptions> </SyntaxOptions>
</Parsing> </Parsing>
<CodeGeneration>
<Generate Value="Faster"/>
</CodeGeneration>
<Other> <Other>
<CompilerPath Value="$(CompPath)"/> <CompilerPath Value="$(CompPath)"/>
</Other> </Other>

View File

@@ -1,5 +1,5 @@
{ Diese Datei wurde automatisch von Lazarus erzeugt. Sie darf nicht bearbeitet werden! { This file was automatically created by Lazarus. do not edit!
Dieser Quelltext dient nur dem Übersetzen und Installieren des Packages. This source is only used to compile and install the package.
} }
unit laz_acs; unit laz_acs;
@@ -8,9 +8,9 @@ interface
uses uses
acs_audio, acs_audiomix, acs_cdrom, acs_classes, acs_converters, acs_file, acs_audio, acs_audiomix, acs_cdrom, acs_classes, acs_converters, acs_file,
acs_filters, acs_indicator, acs_misc, acs_mixer, acs_multimix, acs_streams, acs_filters, acs_indicator, acs_misc, acs_mixer, acs_multimix, acs_streams,
acs_strings, acs_types, acs_stdaudio, acs_reg, acs_allformats, acs_strings, acs_types, acs_stdaudio, acs_reg, acs_allformats,
LazarusPackageIntf; LazarusPackageIntf;
implementation implementation

View File

@@ -1,10 +1,10 @@
<?xml version="1.0"?> <?xml version="1.0"?>
<CONFIG> <CONFIG>
<Package Version="2"> <Package Version="3">
<PathDelim Value="\"/> <PathDelim Value="\"/>
<Name Value="LAZ_ACS"/> <Name Value="LAZ_ACS"/>
<CompilerOptions> <CompilerOptions>
<Version Value="5"/> <Version Value="8"/>
<PathDelim Value="\"/> <PathDelim Value="\"/>
<SearchPaths> <SearchPaths>
<IncludeFiles Value="..\classes\windows\;..\fileformats\windows\;..\drivers\windows\;..\dsp\"/> <IncludeFiles Value="..\classes\windows\;..\fileformats\windows\;..\drivers\windows\;..\dsp\"/>
@@ -13,11 +13,11 @@
</SearchPaths> </SearchPaths>
<Parsing> <Parsing>
<SyntaxOptions> <SyntaxOptions>
<DelphiCompat Value="True"/> <SyntaxMode Value="Delphi"/>
<CStyleOperator Value="False"/>
</SyntaxOptions> </SyntaxOptions>
</Parsing> </Parsing>
<CodeGeneration> <CodeGeneration>
<Generate Value="Faster"/>
<Optimizations> <Optimizations>
<OptimizationLevel Value="2"/> <OptimizationLevel Value="2"/>
</Optimizations> </Optimizations>