| | | | | |

2024年12月26日

摘要： uses IWHTMLTag; 写在之前 procedure TIWForm1.IWButton1HTMLTag(ASender: TObject; ATag: TIWHTMLTag); begin ATag.AddStringParam('style', 'FONT-SIZE: 30px; wid 阅读全文

posted @ 2024-12-26 15:22 涂磊阅读(22) 评论(0) 推荐(0)

HTML圆角按钮

摘要： <!DOCTYPE html> <html lang="zh-Hans"> <head> <meta charset="UTF-8"> <meta name="viewport" content="width=device-width, initial-scale=1.0"> <title>圆角按钮阅读全文

posted @ 2024-12-26 14:46 涂磊阅读(44) 评论(0) 推荐(0)

2024年12月25日

02-IntraWeb自定义CSS

摘要： procedure TIWForm3.IWAppFormCreate(Sender: TObject); begin IWLabel1.ExtraTagParams.Add('style = color: #f00; font-size:22px;'); end; 使用 IntraWeb (10) 阅读全文

posted @ 2024-12-25 11:05 涂磊阅读(28) 评论(0) 推荐(0)

2024年12月24日

01-IntraWeb的HelloWorld

摘要：添加一个TIWButton到Unit1界面上双击这个IWButton1 procedure TIWForm1.IWButton1Click(Sender: TObject); begin WebApplication.ShowMessage('IntraWeb hello world'); en 阅读全文

posted @ 2024-12-24 18:35 涂磊阅读(25) 评论(0) 推荐(0)

一个页面打开另外一个页面Response.SendRedirect('Show');//跳转到 Show页面<a href ="/Show">显示</a>

摘要：一个页面打开另外一个页面Response.SendRedirect('Show');//跳转到 Show页面 <a href ="/Show">显示</a> aHTMLtext.Add('<td> <a onclick="return confirm(''确认删除'+FDQuery1.Fields. 阅读全文

posted @ 2024-12-24 10:42 涂磊阅读(20) 评论(0) 推荐(0)