FreeWare UNIT: Expanded (replacement) TClipboard class

19 views
Skip to first unread message

HeartWare

unread,
Nov 18, 2025, 4:35:01 AMNov 18
to DAPUG

HeartWare

unread,
Nov 20, 2025, 2:07:15 AMNov 20
to DAPUG
Jeg blev ping'et om, at det kunne være en fordel at beskrive UNIT'en her (selvom der er en README.md på GitHub :-).

Det er en UNIT, der - hvis du inkluderer den - overtager den normale Delphi TClipboard første gang Clipboard-funktionen i denne UNIT kaldes. Den giver et par ekstra funktionaliteter:

1) En OnUpdate REFERENCE procedure (eftersom TClipboard ikke kan lægges på en form og dens Events dermed tilgås via IDE, så er jeg ikke begrænset til PROCEDURE OF OBJECT metoder) som kaldes når Windows Clipboard ændres (hvis man f.eks. har behov for at monitorere Clipboard, så behøver man ikke længere en Timer event for at gøre dette)

2) Nye properties to at lægge Filer (som Copy/Paste fra Explorer) på clipboard: AsFile / AsFiles. Ved læsning hentes alle lagte filer på clipboard ud som filnavne (og man lægger filer på clipboard ved at sende en TFileName eller TArray<TFileName>). Når der lægges fil(er) på clipboard, så lægges også en CF_TEXT med filnavn(e) (så man kan paste ind i f.eks. NotePad)

Keld "HeartWare" Hansen

On Tuesday, 18 November 2025 at 10:35:01 UTC+1 HeartWare wrote:
https://github.com/HeartWareDK/Clipboard

HeartWare

unread,
Nov 24, 2025, 3:10:09 AMNov 24
to DAPUG
This Delphi-PRAXIS thread made me aware (or rather, reminded me) that messages are thread-based, so now the hidden Message window is ensured to be created on the main thread, even if called from within a background thread.
Reply all
Reply to author
Forward
0 new messages