pascal 0.1.6

A modern Pascal compiler with build/intepreter/package manager built with Rust
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98

//! Forms Module
//! 
//! Defines form types and implementations for the Pascal visual framework

pub mod base_form;
pub mod main_form;
pub mod modal_form;

// Re-export main form types
pub use base_form::*;
pub use main_form::*;
pub use modal_form::*;

use crate::visual_framework::{Component, Form, EventResult};
use crate::visual_framework::events::Event;
use std::collections::HashMap;

/// Base form implementation
pub struct BaseForm {
    id: String,
    title: String,
    x: i32,
    y: i32,
    width: u32,
    height: u32,
    components: Vec<Box<dyn Component>>,
    component_map: HashMap<String, Box<dyn Component>>,
}

impl BaseForm {
    pub fn new(id: &str, title: &str, x: i32, y: i32, width: u32, height: u32) -> Self {
        Self {
            id: id.to_string(),
            title: title.to_string(),
            x,
            y,
            width,
            height,
            components: Vec::new(),
            component_map: HashMap::new(),
        }
    }
    
    pub fn get_component(&self, id: &str) -> Option<&dyn Component> {
        self.component_map.get(id).map(|c| &**c as &dyn Component)
    }
}

impl Form for BaseForm {
    fn id(&self) -> &str {
        &self.id
    }
    
    fn title(&self) -> &str {
        &self.title
    }
    
    fn set_title(&mut self, title: &str) {
        self.title = title.to_string();
    }
    
    fn bounds(&self) -> (i32, i32, u32, u32) {
        (self.x, self.y, self.width, self.height)
    }
    
    fn set_bounds(&mut self, x: i32, y: i32, width: u32, height: u32) {
        self.x = x;
        self.y = y;
        self.width = width;
        self.height = height;
    }
    
    fn add_component(&mut self, component: Box<dyn Component>) {
        let id = component.id().to_string();
        self.components.push(component);
        // Note: In a real implementation, we'd need to handle the component_map properly
        // For now, we'll just store a reference if possible
    }
    
    fn remove_component(&mut self, component_id: &str) -> bool {
        let index = self.components.iter().position(|c| c.id() == component_id);
        if let Some(pos) = index {
            self.components.remove(pos);
            true
        } else {
            false
        }
    }
    
    fn components(&self) -> &Vec<Box<dyn Component>> {
        &self.components
    }
    
    fn handle_event(&mut self, event: &Event) -> EventResult {
        // Handle form-level events
        EventResult::NotHandled
    }
}