Jak wczytać do komponentu TImage obrazek ze schowka ?
uses
Clipbrd;
if Clipboard().HasFormat(CF_BITMAP) = true then
begin
Image1.Picture.Bitmap.LoadFromClipboardFormat(CF_BITMAP, Clipboard().GetAsHandle(CF_BITMAP), 0);
end;
Clipbrd;
if Clipboard().HasFormat(CF_BITMAP) = true then
begin
Image1.Picture.Bitmap.LoadFromClipboardFormat(CF_BITMAP, Clipboard().GetAsHandle(CF_BITMAP), 0);
end;
Materiał dodany przez użytkownika: alphan
