diff --git a/lib/Cro/WebApp/Form.pm6 b/lib/Cro/WebApp/Form.pm6
index 3e64264..c994cff 100644
--- a/lib/Cro/WebApp/Form.pm6
+++ b/lib/Cro/WebApp/Form.pm6
@@ -13,6 +13,7 @@ my role FormProperties {
     has Int $.webapp-form-maxlength is rw;
     has Real $.webapp-form-min is rw;
     has Real $.webapp-form-max is rw;
+    has Bool $.webapp-form-ro is rw;
     has List @.webapp-form-validations;
 }
 
@@ -155,6 +156,11 @@ multi trait_mod:<is>(Attribute:D $attr, Real :$min! --> Nil) is export {
     $attr.webapp-form-min = $min;
 }
 
+multi trait_mod:<is>(Attribute:D $attr, Bool :$form-read-only! --> Nil) is export {
+    ensure-attr-state($attr);
+    $attr.webapp-form-ro = $form-read-only;
+}
+
 #| Set the maximum numeric value of an input field
 multi trait_mod:<is>(Attribute:D $attr, Real :$max! --> Nil) is export {
     ensure-attr-state($attr);
@@ -292,9 +298,11 @@ role Cro::WebApp::Form {
         my %form-data := $body.hash;
         my %values;
         my %unparseable;
+
         for self.^attributes.grep(*.has_accessor) -> Attribute $attr {
             my $name = $attr.name.substr(2);
             my $value := %form-data{$name};
+
             if $attr.type ~~ Positional {
                 my $value-type = $attr.type.of;
                 my @values := $value ~~ Cro::HTTP::MultiValue ?? $value.list !!
@@ -393,6 +401,7 @@ role Cro::WebApp::Form {
                     (with $attr.?webapp-form-placeholder { placeholder => $_ }),
                     required => ?$attr.required,
                     type => $control-type,
+                    read-only => $attr.?webapp-form-ro,
                     %properties;
             if %validation-by-control{$name} -> @errors {
                 self!set-control-validation(%control, @errors)
@@ -487,7 +496,9 @@ role Cro::WebApp::Form {
     method !add-current-value(Attribute $attr, %properties? is copy) {
         with $attr.get_value(self) {
             when Date { %properties<value> = .yyyy-mm-dd; }
-            when DateTime { %properties<value> = .Str; }
+
+            when DateTime { %properties<value> .= Str }
+
             default { %properties<value> = $_; }
         }
         orwith %!unparseable{$attr.name.substr(2)} {
diff --git a/resources/prelude.crotmp b/resources/prelude.crotmp
index 86a2b77..dbe2cc6 100644
--- a/resources/prelude.crotmp
+++ b/resources/prelude.crotmp
@@ -46,7 +46,7 @@
     <?{ .type eq 'text' || .type eq 'email' || .type eq 'search' || .type eq 'url' || .type eq 'tel' }>
       <div<&class($input-group-class)>>
         <label for="<.name>"<&class($input-label-class)>><.label></label>
-        <input type="<.type>" name="<.name>" id="<.name>"<&control-class($_, $input-control-class, :$is-invalid-class)><&str-opts($_)><?.<value>.defined()> value="<.value>"</?>>
+        <input type="<.type>" name="<.name>" <?.read-only>disabled</?> id="<.name>"<&control-class($_, $input-control-class, :$is-invalid-class)><&str-opts($_)><?.<value>.defined()> value="<.value>"</?>>
         <&control-help($_, :$help-class)>
         <&control-validation-message($_, :$invalid-feedback-class)>
       </div>
@@ -54,7 +54,7 @@
     <?{ .type eq 'file' }>
       <div<&class($input-group-class)>>
         <label for="<.name>"<&class($input-label-class)>><.label></label>
-        <input type="<.type>" name="<.name>" id="<.name>"<&control-class($_, $input-control-class, :$is-invalid-class)><&str-opts($_)>>
+        <input type="<.type>" name="<.name>" <?.read-only>disabled</?> id="<.name>"<&control-class($_, $input-control-class, :$is-invalid-class)><&str-opts($_)>>
         <&control-help($_, :$help-class)>
         <&control-validation-message($_, :$invalid-feedback-class)>
       </div>
@@ -62,7 +62,7 @@
     <?{ .type eq 'number' }>
       <div<&class($input-group-class)>>
         <label for="<.name>"<&class($input-label-class)>><.label></label>
-        <input type="number" name="<.name>" id="<.name>"<&control-class($_, $input-control-class, :$is-invalid-class)><&num-opts($_)><?.<value>.defined()> value="<.value>"</?>>
+        <input type="number" name="<.name>" <?.read-only>disabled</?> id="<.name>"<&control-class($_, $input-control-class, :$is-invalid-class)><&num-opts($_)><?.<value>.defined()> value="<.value>"</?>>
         <&control-help($_, :$help-class)>
         <&control-validation-message($_, :$invalid-feedback-class)>
       </div>
@@ -70,7 +70,7 @@
     <?{ .type eq 'color' || .type eq 'date' || .type eq 'datetime-local' || .type eq 'month' || .type eq 'time' || .type eq 'week' }>
       <div<&class($input-group-class)>>
         <label for="<.name>"<&class($input-label-class)>><.label></label>
-        <input type="<.type>" name="<.name>" id="<.name>"<&control-class($_, $input-control-class, :$is-invalid-class)><?.<value>.defined()> value="<.value>"</?>>
+        <input type="<.type>" name="<.name>" <?.read-only>disabled</?> id="<.name>"<&control-class($_, $input-control-class, :$is-invalid-class)><?.<value>.defined()> value="<.value>"</?>>
         <&control-help($_, :$help-class)>
         <&control-validation-message($_, :$invalid-feedback-class)>
       </div>
@@ -78,7 +78,7 @@
     <?{ .type eq 'password' }>
       <div<&class($input-group-class)>>
         <label for="<.name>"<&class($input-label-class)>><.label></label>
-        <input type="password" name="<.name>" id="<.name>"<&control-class($_, $input-control-class, :$is-invalid-class)>>
+        <input type="password" name="<.name>" <?.read-only>disabled</?> id="<.name>"<&control-class($_, $input-control-class, :$is-invalid-class)>>
         <&control-help($_, :$help-class)>
         <&control-validation-message($_, :$invalid-feedback-class)>
       </div>
@@ -86,14 +86,14 @@
     <?{ .type eq 'textarea' }>
       <div<&class($input-group-class)>>
         <label for="<.name>"<&class($input-label-class)>><.label></label>
-        <textarea name="<.name>" id="<.name>"<&control-class($_, $input-control-class, :$is-invalid-class)><&rows-cols(.rows, .cols)><&str-opts($_)>><?.<value>.defined()><.value></?></textarea>
+        <textarea name="<.name>" <?.read-only>disabled</?> id="<.name>"<&control-class($_, $input-control-class, :$is-invalid-class)><&rows-cols(.rows, .cols)><&str-opts($_)>><?.<value>.defined()><.value></?></textarea>
         <&control-help($_, :$help-class)>
         <&control-validation-message($_, :$invalid-feedback-class)>
       </div>
     </?>
     <?{ .type eq 'checkbox' }>
       <div<&class($check-group-class)>>
-        <input type="checkbox" name="<.name>" id="<.name>"<&control-class($_, $check-control-class, :$is-invalid-class)><?.<value>> checked</?>>
+        <input type="checkbox" name="<.name>" <?.read-only>disabled</?> id="<.name>"<&control-class($_, $check-control-class, :$is-invalid-class)><?.<value>> checked</?>>
         <label for="<.name>"<&class($check-label-class)>><.label></label>
         <&control-help($_, :$help-class)>
         <&control-validation-message($_, :$invalid-feedback-class)>
@@ -102,7 +102,7 @@
     <?{ .type eq 'select' }>
       <div<&class($input-group-class)>>
         <label for="<.name>"<&class($input-label-class)>><.label></label>
-        <select <?.multi>multiple</?> name="<.name>" id="<.name>"<&control-class($_, $input-control-class, :$is-invalid-class)>>
+        <select <?.multi>multiple</?> name="<.name>" <?.read-only>disabled</?> id="<.name>"<&control-class($_, $input-control-class, :$is-invalid-class)>>
           <@options : $opt>
             <option value="<$opt.[0]>"<?{ $opt.[2] }> selected="selected"</?>><$opt.[1]></option>
           </@>