mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-13 09:59:25 +02:00
* fix from bart for mantis #0038581 that prohibits reusing readbinarydata
as basis for a multisz reader. git-svn-id: trunk@49165 -
This commit is contained in:
parent
c1f85ac3a1
commit
5340d45a18
@ -481,8 +481,6 @@ Var
|
||||
|
||||
begin
|
||||
Result := GetData(Name, @Buffer, BufSize, RegDataType);
|
||||
If not (RegDataType in [rdBinary, rdUnknown]) Then
|
||||
Raise ERegistryException.CreateFmt(SInvalidRegType, [Name]);
|
||||
end;
|
||||
|
||||
function TRegistry.ReadBinaryData(const Name: String; var Buffer;
|
||||
|
Loading…
Reference in New Issue
Block a user