DouKaku?beta

Comment detail

ウィンドウの表示 (Nested Flatten)
Gauche+Gauche-glでやってみました。 でもタイトルはutf-8で渡しても化けるなあ… 
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
;; -*- coding: utf-8 -*-
(use gl)
(use gl.glut)

(define (main args)
  (glut-init args)
  (glut-init-display-mode GLUT_SINGLE)
  (glut-init-window-size 100 75)
  (glut-create-window "こんにちは、GUI!")
  (gl-clear-color 0 0 0 0)
  (glut-display-func (lambda () (gl-clear GL_COLOR_BUFFER_BIT) (gl-flush)))
  (glut-main-loop)
  0)

Index

Feed

Other

Link

Pathtraq

loading...
Creative Commons License このサイトの内容は、 クリエイティブ・コモンズ・ライセンスの下でライセンスされています。 [詳細]