1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
|
#! /usr/bin/env lua
-- Gtk clipboard sample, adapted from Vala clipboard sample at
-- http://live.gnome.org/Vala/GTKSample#Clipboard
local lgi = require 'lgi'
local Gtk = lgi.require('Gtk', '3.0')
local Gdk = lgi.Gdk
local app = Gtk.Application { application_id = 'org.lgi.samples.gtkclipboard' }
function app:on_activate()
local entry = Gtk.Entry {}
local window = Gtk.Window {
application = self,
title = 'Clipboard',
default_width = 300, default_height = 20,
child = entry
}
window:show_all()
local display = window:get_display()
local clipboard = Gtk.Clipboard.get_for_display(
display, Gdk.SELECTION_CLIPBOARD)
-- Get text from clipboard
entry.text = clipboard:wait_for_text() or ''
-- If the user types something, set text to clipboard
function entry:on_changed()
clipboard:set_text(entry.text, -1)
end
end
app:run { arg[0], ... }
|
