<form action="MN" method="post"> <input type="color" name="favcolor"> <br> <input type="submit" value="提交"> </form>
//MN <input type="color" name="favcolor"> 颜色 输入 procedure TWebModule1.WebModule1WebActionItem8Action(Sender: TObject; Request: TWebRequest; Response: TWebResponse; var Handled: Boolean); var s: string; begin /// S := Request.ContentFields.Text; favcolor=#ad84fb name=Value S := Request.ContentFields.Values['favcolor'] ; Response.Content := s; end;


浙公网安备 33010602011771号