Label Widget inside horizon

This commit is contained in:
Able 2024-11-06 09:36:17 -06:00
parent 12883ac926
commit a49ac7bca0

View file

@ -4,9 +4,35 @@ stn := @use("../../../libraries/stn/src/lib.hb");
horizon_api := @use("../../../libraries/horizon_api/src/lib.hb") horizon_api := @use("../../../libraries/horizon_api/src/lib.hb")
render := @use("../../../libraries/render/src/lib.hb") render := @use("../../../libraries/render/src/lib.hb");
.{Surface} := render;
.{Font} := render.text
intouch := @use("../../../libraries/intouch/src/lib.hb") intouch := @use("../../../libraries/intouch/src/lib.hb")
Label := struct {is_dirty: bool, surface: Surface, text: ^u8, text_length: uint}
set_label_text := fn(label: Label, text: ^u8, text_length: uint): void {
label.is_dirty = true
label.text = text
label.text_length = text_length
}
render_label_to_surface := fn(surface: Surface, label: Label, font: Font): void {
if label.is_dirty {
render.clear(label.surface, render.blue)
render.put_text(label.surface, font, .(0, 0), render.red, "hi\0")
}
pos := Vec2(uint).(100, 100)
render.put_surface(surface, label.surface, pos, false)
render.sync(surface)
}
new_label := fn(text: ^u8): Label {
text_surface := render.new_surface(100, 16)
text_length := string.length(text)
label := Label.(true, text_surface, text, text_length)
return label
}
Window := struct { Window := struct {
// TODO: Replace this with widgets // TODO: Replace this with widgets
implicit_framebuffer: render.Surface, implicit_framebuffer: render.Surface,
@ -37,6 +63,7 @@ main := fn(): int {
mouse_x := 0 mouse_x := 0
mouse_y := 0 mouse_y := 0
text_label := new_label("Hi\0")
loop { loop {
// Clear the screen // Clear the screen
@ -70,6 +97,8 @@ main := fn(): int {
render.put_rect(screen, .(0, 0), .(screen.width - 1, screen.height - 1), render.white) render.put_rect(screen, .(0, 0), .(screen.width - 1, screen.height - 1), render.white)
render_label_to_surface(screen, text_label, font)
// Sync the screen // Sync the screen
render.sync(screen) render.sync(screen)
} }