mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-11 12:39:20 +02:00
MG: removed unused
git-svn-id: trunk@1398 -
This commit is contained in:
parent
0cad522d25
commit
89233d5b7c
@ -840,7 +840,7 @@ type
|
||||
|
||||
implementation
|
||||
|
||||
uses Dialogs, Math, ColumnDlg;
|
||||
uses Dialogs, ColumnDlg;
|
||||
|
||||
|
||||
const
|
||||
|
@ -321,6 +321,7 @@ end;
|
||||
|
||||
procedure TConfigureBuildLazarusDlg.Save(Options: TBuildLazarusOptions);
|
||||
begin
|
||||
if Options=nil then exit;
|
||||
Options.CleanAll:=CleanAllCheckBox.Checked;
|
||||
Options.BuildLCL:=IntToMakeMode(BuildLCLRadioGroup.ItemIndex);
|
||||
Options.BuildSynEdit:=IntToMakeMode(BuildSynEditRadioGroup.ItemIndex);
|
||||
|
@ -78,8 +78,6 @@ end;
|
||||
{------------------------------------------------------------------------------}
|
||||
function TCompiler.Compile(AProject: TProject; BuildAll: boolean;
|
||||
const DefaultFilename: string): TModalResult;
|
||||
const
|
||||
BufSize = 1024;
|
||||
var
|
||||
CmdLine : String;
|
||||
Abort : Boolean;
|
||||
@ -181,6 +179,9 @@ end.
|
||||
|
||||
{
|
||||
$Log$
|
||||
Revision 1.29 2002/03/28 00:11:04 lazarus
|
||||
MG: removed unused
|
||||
|
||||
Revision 1.28 2002/01/23 20:07:20 lazarus
|
||||
MG: added outputfilter
|
||||
|
||||
|
@ -41,8 +41,6 @@ type
|
||||
|
||||
implementation
|
||||
|
||||
uses Strings, Math;
|
||||
|
||||
type
|
||||
TCharType = (ctNone,ctWordBegin,ctWord);
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user