mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-27 02:53:40 +02:00
40 lines
1.3 KiB
ObjectPascal
40 lines
1.3 KiB
ObjectPascal
{ Copyright (C) 2004
|
|
|
|
*****************************************************************************
|
|
* *
|
|
* See the file COPYING.modifiedLGPL, included in this distribution, *
|
|
* for details about the copyright. *
|
|
* *
|
|
* 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. *
|
|
* *
|
|
*****************************************************************************
|
|
|
|
Author: Mattias Gaertner
|
|
|
|
Abstract: Base classes of the IDEIntf.
|
|
}
|
|
unit BaseIDEIntf;
|
|
|
|
{$mode objfpc}{$H+}
|
|
|
|
interface
|
|
|
|
uses
|
|
Classes, SysUtils, LazConfigStorage;
|
|
|
|
type
|
|
TGetIDEConfigStorage = function(const Filename: string; LoadFromDisk: Boolean
|
|
): TConfigStorage;
|
|
|
|
var
|
|
DefaultConfigClass: TConfigStorageClass = nil; // will be set by the IDE
|
|
GetIDEConfigStorage: TGetIDEConfigStorage = nil; // will be set by the IDE
|
|
|
|
|
|
implementation
|
|
|
|
end.
|
|
|