LazReport: In TfrCustomMemoView do not convert code page when loading lines from a blob field. Issue

git-svn-id: branches/fixes_2_0@62849 -
This commit is contained in:
mattias 2020-04-02 11:20:22 +00:00
parent efebefd5c2
commit c2436284b0

View File

@ -4745,23 +4745,8 @@ begin
end;
procedure TfrCustomMemoView.GetBlob(b: TfrTField);
var
M: TMemoryStream;
begin
// todo: TBLobField.AssignTo is not implemented yet
// even if I supply a patch for 2.0.4 it will
// not be integrated because it's in RC1 now
// (I guess)
//
//Memo1.Assign(b);
M := TMemoryStream.Create;
try
TBlobField(B).SaveToStream(M);
M.Position := 0;
Memo1.LoadFromStream(M);
finally
M.Free;
end;
Memo1.Text := TBlobField(b).AsString;
end;
procedure TfrCustomMemoView.FontChange(sender: TObject);