#include <CtrlLib/CtrlLib.h>
#include <RichEdit/RichEdit.h>
using namespace Upp;

GUI_APP_MAIN
{
	RichText txt;
	{
		RichPara para;
		RichPara::Format fmt;
		(Font&)fmt = Monospace(50).Bold();
		para.Cat("", fmt);
		txt.Cat(para);
	}
	
    RichEdit e;
    e.ShowCodes(Null);	//hide enter marks
    e.Clear();
	
    HDC screen = GetDC(NULL); // Get device context for the screen
    int dpiX = GetDeviceCaps(screen, LOGPIXELSX); // Horizontal DPI
    int dpiY = GetDeviceCaps(screen, LOGPIXELSY); // Vertical DPI
    ReleaseDC(NULL, screen);	
    			
    e.Pick(pick(txt));
        
    TopWindow win;
    win.Add(e.SizePos());
    win.Run();
}

class MyApp : public TopWindow {
    RichEdit richEdit;

public:
    MyApp() {
        Title("Adjust DPI for Pasted Image").Sizeable();

        // Intercept the paste action and adjust the image DPI
        richEdit.WhenPaste = [&]() {
            // Check if the clipboard contains an image
            if (ClipboardHas<Image>()) {
                Image img = ReadClipboardImage();
                if (!img.IsEmpty()) {
                    // Get system DPI
                    Size dpi = GetPrimaryScreenDPI(); // Get DPI of the primary screen
                    double scaleFactor = dpi.cx / 96.0; // Assuming 96 DPI as the base

                    // Scale the image
                    int newWidth = img.GetWidth() * scaleFactor;
                    int newHeight = img.GetHeight() * scaleFactor;
                    Image scaledImage = Rescale(img, newWidth, newHeight);

                    // Insert the scaled image into the RichEdit control
                    richEdit.PasteImage(scaledImage);
                }
            } else {
                // Default paste behavior for non-image content
                richEdit.Paste();
            }
        };

        Add(richEdit.SizePos());
    }
};