Hds Wert
-
Постов
3 -
Зарегистрирован
-
Посещение
Активность репутации
-
Hds Wert отреагировална krapotkin в скопировать изображение в буфер обмена
Clipboardservice это объект. Его надо создать. В первом примере нарисовано, как.
-
Hds Wert отреагировална krapotkin в скопировать изображение в буфер обмена
вставка
if not TPlatformServices.Current.SupportsPlatformService(IFMXExtendedClipboardService, ClipboardService) then
exit;
if ClipboardService.HasImage then
begin
b := TBitmap.Create;
bs := ClipboardService.GetImage;
b.Assign(bs);
end
копирование
....
surface := TBitmapSurface.Create();
surface.Assign(bitmap);
ClipboardService.SetImage(surface)