make-instance 'capi:interface but no window

Dear LW gurus -

I am trying to create a toplevel interface witz CAPI like so:

(defun make-simple-capi-interface (&key create-cb destroy-cb)
  (make-instance 'capi:interface
		 :title "TEST"
		 :menu-bar-items nil
		 :auto-menus nil
		 :message-area nil
		 :enable-tooltips nil
		 :help-callback nil
		 :external-border nil
		 :internal-border nil
		 :visible-border nil
		 :geometry-change-callback nil
		 :iconify-callback nil
		 :iconize-callback nil
		 :display-state :normal
		 :transparency 0
		 :window-styles nil
		 :toolbar-items nil
		 :toolbar-states nil
		 :default-toolbar-states nil
		 :create-callback create-cb
		 :destroy-callback destroy-cb
		 :best-width 800
		 :best-height 600
		 :best-x 0
		 :best-y 0
		 :visible-min-width 800
		 :visible-min-height 600
		 ))

Platform is macOS Sierra 10.12.5. LW is 7.0 Professional.

The objective is to have toplevel window with no decorations at all but being placed a (0 / 0) and having a widt of 800 and height of 600 (pixels). LW gives back an interface but I dpn’t see any window appearing when I call capi:display on the result…. What am I doing wrong? Thx for any insight / hints / directions…

Kind regards

  Frank



_______________________________________________
Lisp Hug - the mailing list for LispWorks users
lisp-hug@lispworks.com
http://www.lispworks.com/support/lisp-hug.html

Re: make-instance 'capi:interface but no window

Do you need some kind of pane inside the window?
Pt

> On Jun 12, 2017, at 10:04 AM, Frank Gönninger | Gönninger B&T <frank.goenninger@goenninger.net> wrote:
> 
> Dear LW gurus -
> 
> I am trying to create a toplevel interface witz CAPI like so:
> 
> (defun make-simple-capi-interface (&key create-cb destroy-cb)
>  (make-instance 'capi:interface
>         :title "TEST"
>         :menu-bar-items nil
>         :auto-menus nil
>         :message-area nil
>         :enable-tooltips nil
>         :help-callback nil
>         :external-border nil
>         :internal-border nil
>         :visible-border nil
>         :geometry-change-callback nil
>         :iconify-callback nil
>         :iconize-callback nil
>         :display-state :normal
>         :transparency 0
>         :window-styles nil
>         :toolbar-items nil
>         :toolbar-states nil
>         :default-toolbar-states nil
>         :create-callback create-cb
>         :destroy-callback destroy-cb
>         :best-width 800
>         :best-height 600
>         :best-x 0
>         :best-y 0
>         :visible-min-width 800
>         :visible-min-height 600
>         ))
> 
> Platform is macOS Sierra 10.12.5. LW is 7.0 Professional.
> 
> The objective is to have toplevel window with no decorations at all but being placed a (0 / 0) and having a widt of 800 and height of 600 (pixels). LW gives back an interface but I dpn’t see any window appearing when I call capi:display on the result…. What am I doing wrong? Thx for any insight / hints / directions…
> 
> Kind regards
> 
>  Frank
> 
> 
> 
> _______________________________________________
> Lisp Hug - the mailing list for LispWorks users
> lisp-hug@lispworks.com
> http://www.lispworks.com/support/lisp-hug.html

_______________________________________________
Lisp Hug - the mailing list for LispWorks users
lisp-hug@lispworks.com
http://www.lispworks.com/support/lisp-hug.html

Re: make-instance 'capi:interface but no window

Hi Paul,

> Am 12.06.2017 um 20:12 schrieb paul tarvydas <paultarvydas@gmail.com>:
> 
> Do you need some kind of pane inside the window?
> Pt

Eventually, yes. Why do ask?

;; Frank

> 
>> On Jun 12, 2017, at 10:04 AM, Frank Gönninger | Gönninger B&T <frank.goenninger@goenninger.net> wrote:
>> 
>> Dear LW gurus -
>> 
>> I am trying to create a toplevel interface witz CAPI like so:
>> 
>> (defun make-simple-capi-interface (&key create-cb destroy-cb)
>> (make-instance 'capi:interface
>>        :title "TEST"
>>        :menu-bar-items nil
>>        :auto-menus nil
>>        :message-area nil
>>        :enable-tooltips nil
>>        :help-callback nil
>>        :external-border nil
>>        :internal-border nil
>>        :visible-border nil
>>        :geometry-change-callback nil
>>        :iconify-callback nil
>>        :iconize-callback nil
>>        :display-state :normal
>>        :transparency 0
>>        :window-styles nil
>>        :toolbar-items nil
>>        :toolbar-states nil
>>        :default-toolbar-states nil
>>        :create-callback create-cb
>>        :destroy-callback destroy-cb
>>        :best-width 800
>>        :best-height 600
>>        :best-x 0
>>        :best-y 0
>>        :visible-min-width 800
>>        :visible-min-height 600
>>        ))
>> 
>> Platform is macOS Sierra 10.12.5. LW is 7.0 Professional.
>> 
>> The objective is to have toplevel window with no decorations at all but being placed a (0 / 0) and having a widt of 800 and height of 600 (pixels). LW gives back an interface but I dpn’t see any window appearing when I call capi:display on the result…. What am I doing wrong? Thx for any insight / hints / directions…
>> 
>> Kind regards
>> 
>> Frank
>> 
>> 
>> 
>> _______________________________________________
>> Lisp Hug - the mailing list for LispWorks users
>> lisp-hug@lispworks.com
>> http://www.lispworks.com/support/lisp-hug.html


_______________________________________________
Lisp Hug - the mailing list for LispWorks users
lisp-hug@lispworks.com
http://www.lispworks.com/support/lisp-hug.html