Mark van Renswoude
16ba374f21
Added: variant hashes Added: Delphi 7 package (note: D6 package is not in sync yet!)
47 lines
922 B
ObjectPascal
47 lines
922 B
ObjectPascal
{
|
|
:: Implements the IX2ConfigSource for INI files.
|
|
::
|
|
:: Last changed: $Date$
|
|
:: Revision: $Rev$
|
|
:: Author: $Author$
|
|
}
|
|
unit X2UtConfigIni;
|
|
|
|
interface
|
|
uses
|
|
X2UtConfig;
|
|
|
|
type
|
|
TX2IniConfigSource = class(TX2StreamConfigSource)
|
|
protected
|
|
procedure IniSection(Sender: TObject; Section: String);
|
|
procedure IniValue(Sender: TObject; Name, Value: String);
|
|
public
|
|
constructor Create(const AStream: TStream); override;
|
|
end;
|
|
|
|
implementation
|
|
uses
|
|
X2UtIniParser;
|
|
|
|
{===================== TX2IniConfigSource
|
|
Initialization
|
|
========================================}
|
|
constructor TX2IniConfigSource.Create(const AStream: TStream);
|
|
begin
|
|
|
|
end;
|
|
|
|
|
|
procedure TX2IniConfigSource.IniSection(Sender: TObject; Section: String);
|
|
begin
|
|
//
|
|
end;
|
|
|
|
procedure TX2IniConfigSource.IniValue(Sender: TObject; Name, Value: String);
|
|
begin
|
|
//
|
|
end;
|
|
|
|
end.
|
|
|