Copy(Text, LocaleID=0x419)
{
    CF_TEXT:=1, CF_LOCALE:=16, GMEM_MOVEABLE:=2
    TextLen :=StrLen(Text)
    HmemText :=DllCall("GlobalAlloc", "UInt", GMEM_MOVEABLE, "UInt", TextLen+1) ; Запрос перемещаемой
    HmemLocale:=DllCall("GlobalAlloc", "UInt", GMEM_MOVEABLE, "UInt", 4) ; памяти, возвращаются хэндлы.
    If(!HmemText || !HmemLocale)
    Return
    PtrText :=DllCall("GlobalLock", "UInt", HmemText) ; Фиксация памяти, хэндлы конвертируются
    PtrLocale :=DllCall("GlobalLock", "UInt", HmemLocale) ; в указатели (адреса).
    DllCall("msvcrt\memcpy", "UInt", PtrText, "Str", Text, "UInt", TextLen+1, "Cdecl") ; Копирование текста.
    NumPut(LocaleID, PtrLocale+0) ; Запись идентификатора локали.
    DllCall("GlobalUnlock", "UInt", HmemText) ; Расфиксация памяти.
    DllCall("GlobalUnlock", "UInt", HmemLocale)
    If not DllCall("OpenClipboard", "UInt", 0) ; Открытие буфера обмена.
    {
    DllCall("GlobalFree", "UInt", HmemText) ; Освобождение памяти,
    DllCall("GlobalFree", "UInt", HmemLocale) ; если открыть не удалось.
    Return
    }
    DllCall("EmptyClipboard") ; Очистка.
    DllCall("SetClipboardData", "UInt", CF_TEXT, "UInt", HmemText) ; Помещение данных.
    DllCall("SetClipboardData", "UInt", CF_LOCALE, "UInt", HmemLocale)
    DllCall("CloseClipboard") ; Закрытие.
}