Delphi10.3如何在StringGrid某单元格下划线显示,并点击弹出新窗口
拖一个UniHTMLFrame1到界面上
<table border="1" width="500" height="200" align="center" cellpadding="10" cellspacing="0"> <!-- 表格中一行的内容 --> <tr> <!-- 表格中单个单元格内容 --> <td>姓名</td> <td>年龄</td> </tr> <tr> <td><button id = 'btn' onclick='document.getElementById(MainForm.UniButton2.getId()).click();'>按钮</button></td> <!-- 通过调用UniButton2.click来弹出新窗口,UniButton2要可见 --> <td><a href="https://blog.csdn.net/weixin_47139649/article/details/109075700" target="_blank">《HTML基础教程》</a></td> </tr> <tr> <td>Jerry</td> <td>16</td> </tr> </table>
先要创建一个uniForm,再来显示
procedure TMainForm.UniButton2Click(Sender: TObject); begin unit1.UniForm1.ShowModalN end;