Základy schránky (Vystrihnúť / Kopírovať / Prilepiť)

Schránka systému Windows predstavuje kontajner pre akýkoľvek text alebo grafiku, ktoré sú vystrihnuté, skopírované alebo prilepené z alebo do aplikácie. Tento článok vám ukáže, ako používať objekt TClipboard na implementáciu funkcií vystrihnutia a prilepenia do aplikácie Delphi.

Ako pravdepodobne viete, do schránky je možné uložiť iba jeden kus rovnakého druhu údajov na vystrihnutie, kopírovanie a vloženie naraz. Ak do schránky pošleme nové informácie v rovnakom formáte, vymažeme to, čo tam predtým bolo, ale Obsah schránky zostane v schránke aj po vložení tohto obsahu do iného programu.

Aby sme mohli používať schránku Windows v našich aplikáciách, musíme pridať ClipBrd jednotka do klauzuly použitia projektu, s výnimkou prípadu, keď obmedzíme rezanie, kopírovanie a vkladanie na komponenty, ktoré už majú vstavanú podporu pre metódy Clipboard. Týmito komponentmi sú TEdit, TMemo, TOLEContainer, TDDEServerItem, TDBEdit, TDBImage a TDBMemo.

Jednotka ClipBrd automaticky predstavuje objekt TClipboard nazývaný schránka. Použijeme

Na odoslanie určitého textu do schránky sa použije vlastnosť AsText objektu Clipboard. Ak napríklad chceme poslať povrázok informácie obsiahnuté v premennej SomeStringData do schránky (vymazanie všetkého textu, ktorý tam bol), použijeme nasledujúci kód:

použitie ClipBrd; ...
Schránka. AsText: = SomeStringData_Variable; 

Na načítanie textových informácií zo schránky, ktorú použijeme

použitie ClipBrd; ...
SomeStringData_Variable: = Schránka. AsText; 

Poznámka: Ak chceme len skopírovať text, povedzme, Upraviť komponent do schránky, nemusíme do klauzuly použitia zahrnúť jednotku ClipBrd. Metóda CopyToClipboard TEdit skopíruje vybraný text v ovládacom prvku edit do schránky vo formáte CF_TEXT.

procedúra TForm1.Button2Click (Sender: TObject); začať// nasledujúci riadok vyberie // VŠETKY text v ovládacom prvku úpravy {Edit1.SelectAll;} Edit1.CopyToClipboard; koniec; 

Na získanie grafických obrázkov zo schránky musí spoločnosť Delphi vedieť, aký typ obrázka je v nej uložený. Podobne, na prenos obrázkov do schránky musí aplikácia povedať schránke, aký typ grafiky posiela. Nasledujú niektoré z možných hodnôt parametra Format; v systéme Windows existuje omnoho viac formátov schránky.

• CF_TEXT - Text s každým riadkom končiacim písmenom a CR-LF kombinácie.
• CF_BITMAP - Windows bitmapová grafika.
• CF_METAFILEPICT - Grafika metasúboru Windows.
• CF_PICTURE - Objekt typu TPicture.
• CF_OBJECT - Akýkoľvek trvalý objekt.

Metóda HasFormat vracia true, ak má obrázok v schránke správny formát:

ak Schránka. HasFormat (CF_METAFILEPICT) potom ShowMessage ('Schránka má metasúbor'); 

Použite metódu Priradiť na odoslanie (priradenie) obrázka do schránky. Napríklad nasledujúci kód skopíruje bitmapu z bitmapového objektu s názvom MyBitmap do schránky:

 Schránka. Priradiť (MyBitmap); 

MyBitmap je vo všeobecnosti objekt typu TGraphics, TBitmap, TMetafile alebo TPicture.

Ak chcete načítať obrázok zo schránky, musíme: overiť formát aktuálneho obsahu schránky a použiť metódu Priradiť cieľový objekt:

{vložte jedno tlačidlo a jednu kontrolu obrázka do formulára1} {Pred vykonaním tohto kódu stlačte kombináciu klávesov Alt-PrintScreen}použitie ClipBrd;... procedúra TForm1.Button1Click (Sender: TObject); začaťak Schránka. HasFormat (CF_BITMAP) potom Image1.Picture. Bitmap. Priradiť (Schránka); koniec; 

Schránka ukladá informácie vo viacerých formátoch, takže môžeme prenášať údaje medzi aplikáciami pomocou rôznych formátov. Pri čítaní informácií zo schránky pomocou triedy Delphi TClipboard sme obmedzení na štandardné formáty schránky: text, obrázky a metasúbory.

Predpokladajme, že pracujete medzi dvoma rôznymi aplikáciami Delphi; Ako by ste definovali vlastný formát schránky, aby ste mohli odosielať a prijímať údaje medzi týmito dvoma programami? Na účely prieskumu povedzme, že sa pokúšate kódovať prilepenie položka ponuky. Chcete, aby bola zakázaná, keď v schránke nie je žiadny text (napríklad).

Pretože celý proces so schránkou prebieha za scénami, neexistuje žiadna metóda triedy TClipboard, ktorá by vás informovala, keď dôjde k nejakej zmene v obsahu schránky. Cieľom je zapojiť sa do notifikačného systému schránky, takže budete mať prístup a reagovať na udalosti, keď sa schránka zmení.

Aby ste si mohli užiť väčšiu flexibilitu a funkčnosť, je potrebné zaoberať sa oznámeniami o zmene schránky a vlastnými formátmi schránky - počúvaním schránky.