mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-01 01:43:48 +02:00
31 lines
628 B
Plaintext
31 lines
628 B
Plaintext
object Form1: TForm1
|
|
Left = 240
|
|
Height = 480
|
|
Top = 157
|
|
Width = 640
|
|
Caption = 'IMGUI demo'
|
|
ClientHeight = 480
|
|
ClientWidth = 640
|
|
OnCreate = FormCreate
|
|
OnKeyDown = FormKeyDown
|
|
OnKeyPress = FormKeyPress
|
|
LCLVersion = '0.9.31'
|
|
object OpenGLControl1: TOpenGLControl
|
|
Left = 0
|
|
Height = 480
|
|
Top = 0
|
|
Width = 640
|
|
Align = alClient
|
|
OnMouseDown = OpenGLControl1MouseDown
|
|
OnMouseMove = OpenGLControl1MouseMove
|
|
OnMouseUp = OpenGLControl1MouseUp
|
|
OnPaint = OpenGLControl1Paint
|
|
end
|
|
object Timer1: TTimer
|
|
Interval = 1
|
|
OnTimer = Timer1Timer
|
|
left = 16
|
|
top = 19
|
|
end
|
|
end
|