编程资料收集与共享交流

不能用 ShellExecute要用：unisession.addjs('window.open("http://www.163.com","newwindow")')

uses uniGUIServerFormprocedure TUniServerModule.UniGUIServerModuleCreate(Sender: TObject);begin uniGUIServerForm.ServerForm.Caption :='测试一下效果，哈哈哈。';end;

转载自：https://blog.youkuaiyun.com/tvmerp/article/details/107736457//验证码生成单元unit AuthenticodeGenerate;interfaceuses SysUtils, Windows, ExtCtrls, Graphics;function GenerateAuthenticode(const Img: TImage; const Len: Integer = 4): string;implementati.