summaryrefslogtreecommitdiff
path: root/src/corelib
diff options
context:
space:
mode:
Diffstat (limited to 'src/corelib')
-rw-r--r--src/corelib/gdi/gfx_gdi.pas3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/corelib/gdi/gfx_gdi.pas b/src/corelib/gdi/gfx_gdi.pas
index 3ffe7c36..b9211a63 100644
--- a/src/corelib/gdi/gfx_gdi.pas
+++ b/src/corelib/gdi/gfx_gdi.pas
@@ -1978,9 +1978,10 @@ begin
inc(p);
end;
GlobalUnlock(h);
+ FClipboardText := AnsiToUtf8(FClipboardText);
end;
CloseClipboard;
- Result := AnsiToUtf8(FClipboardText);
+ Result := FClipboardText;
end;
procedure TfpgClipboardImpl.DoSetText(const AValue: string);