[Delphi] Jak wkleić tekst do komponentu Memo na aktywnym

Jak wkleić tekst do komponentu Memo na aktywnym komponencie TTabSheet?

Jeżeli tylko w TabSheet masz jeden komponent!!!
TMemo(PageControl.ActivePage.Controls[0]).PasteFromClipboard