fpc/fcl/inc/regini.inc
2003-02-18 10:10:09 +00:00

66 lines
1.3 KiB
PHP

{******************************************************************************
TRegIniFile
******************************************************************************}
constructor TRegIniFile.Create(const FN: String);
begin
inherited Create;
fFileName := FN;
end;
procedure TRegIniFile.DeleteKey(const Section, Ident: String);
begin
end;
procedure TRegIniFile.EraseSection(const Section: string);
begin
end;
procedure TRegIniFile.ReadSection(const Section: string; Strings: TStrings);
begin
end;
procedure TRegIniFile.ReadSections(Strings: TStrings);
begin
end;
procedure TRegIniFile.ReadSectionValues(const Section: string; Strings: TStrings);
begin
end;
procedure TRegIniFile.WriteBool(const Section, Ident: string; Value: Boolean);
begin
end;
procedure TRegIniFile.WriteInteger(const Section, Ident: string; Value: LongInt);
begin
end;
procedure TRegIniFile.WriteString(const Section, Ident, Value: String);
begin
end;
function TRegIniFile.ReadBool(const Section, Ident: string; Default: Boolean): Boolean;
begin
Result := Default;
end;
function TRegIniFile.ReadInteger(const Section, Ident: string; Default: LongInt): LongInt;
begin
Result := Default;
end;
function TRegIniFile.ReadString(const Section, Ident, Default: String): String;
begin
Result := Default;
end;