> 1 <

Автор Сообщение

dominicc

Members


Статус

6 сообщений

Где: ---
Род занятий:
Возраст:

#5953   2012-04-10 18:01 GMT+3 часа(ов)      
у меня есть окно с кнопками ,и полем ввода текста.мне нежно запилить кнопочки которые вставляют html тег в текст, например: ввел Hello world выделил нажал на кнопку Абзац и получаем <Abzac>Hello world</Abzac>
(defun run ()
(let ((output *standard-output*))
(gtk:within-main-loop
(let ((window (make-instance 'gtk:gtk-window
 
:window-position :center
:title "Hello world!"
:default-width 100
:default-height 100))
(button1 (make-instance 'gtk:button :label "Abzac"))
(button2 (make-instance 'gtk:button :label "Teorema"))
(entry (make-instance 'gtk:entry :width 100 :height 100))
(scroll (make-instance 'gtk:scrolled-window
:hscrollbar-policy :automatic
:vscrollbar-policy :automatic)))
(let ((v-box (make-instance 'gtk:v-box))
(box (make-instance 'gtk:h-box)))
(gtk:container-add window v-box)
(gtk:box-pack-start v-box box :expand nil)
(gtk:box-pack-start box entry :expand nil)
(gtk:box-pack-start box button1 :expand nil)
(gtk:box-pack-start box button2 :expand nil)
(gtk:box-pack-start v-box scroll))
(gtk:widget-show window)))))
 
 
(run)

отредактировал(а) dominicc: 2012-04-10 18:25 GMT+3 часа(ов)

bokunopico

Members


Статус

54 сообщений

Где: Russia Нижний Новгород
Род занятий:
Возраст:

#5954   2012-04-10 18:19 GMT+3 часа(ов)      
> помги двачик вся надежда на тебя
> двачик

Дальше не читал.

dominicc

Members


Статус

6 сообщений

Где: ---
Род занятий:
Возраст:

#5955   2012-04-10 18:26 GMT+3 часа(ов)      
Цитата
Дальше не читал
да блин скопипастил!забыл убрать!это такая проблема что ли?
> 1 <


Онлайн :

0 пользователь(ей), 46 гость(ей) :




Реклама на сайте: