|
| 盒子资源分类 |
![]() |
|
|
|
|
| ag娱乐城|优惠【精品源码】 rtc+easyui示例 |
![]() |
| 关键字：rtc+easyui示例 |
| 来 自：精品 |
| 平 台：Win2K/2003/NT/XP |
下载所需：1 火柴 |
| 深浅度：中级 |
完成时间：2015/5/26 |
| 发布者：142857 |
发布时间：2015/5/26 |
| 编辑器：DelphiXE |
语 种：简体中文 |
| 分 类：网络 |
下载浏览：190/16282 |
|
|
|
|
|
procedure?TfrmRtcParseDemo.RtcDataProvider1CheckRequest(Sender:?TRtcConnection);
begin
??//?we?want?to?respond?to?all?root?requests
??with?Sender?as?TRtcDataServer?do
??begin
????if?(Request.FileName.EndsWith('.html'))
??????or?(Request.FileName.EndsWith('.js'))
??????or?(Request.FileName.EndsWith('.css'))
??????or?(Request.FileName.EndsWith('.png'))
??????or?(Request.FileName.EndsWith('.jpeg'))
??????or?(Request.FileName.EndsWith('.gif'))
????then
??????Accept;
??end;
end;
访问：
http://127.0.0.1:801/basic.html
author:中国制造 |
| 本站原创作品，未经作者许可，严禁任何方式转载；转载作品，如果侵犯了您的权益，请联系我们！ |
| 相关文章 |
|
![]() |
|
|
| 相关评论 |
![]() |
|
共有评论41条
当前显示最后6条评论
|
| lovong_delphi |
2015/6/4 10:16:41 |
| 没有火柴,下载不了..求下载地址 |
| searoom |
2015/8/25 14:59:09 |
| 好东西，可惜没火柴，哈哈 |
| tekcare007 |
2015/9/2 6:55:42 |
| 好东西??可以学习 |
| lissdd |
2018/3/28 17:47:41 |
如果用Delphi7,修改代码如下:
??with?Sender?as?TRtcDataServer?do
??begin
????mmo1.Lines.Add('收到请求:?'+?Request.FileName);
????ext?:=?ExtractFileExt(Request.FileName);
????if?(?(?ext='.html')
??????or?(ext='.js')
??????or?(ext='.css')
??????or?(ext='.png')
??????or?(ext='.jpeg')
??????or?(ext='.gif')?)
????then
????begin
??????Accept;
??????mmo1.Lines.Add('接受请求');
????end
????else
??????mmo1.Lines.Add('拒绝未知请求'); |
| lissdd |
2018/3/28 18:17:45 |
这种UI和逻辑分开的设计方式很符合MVC模式?，你可以随便更换UI。
RTC服务端不必用臃肿的XE，只用闪电般的Delphi7就可以做个像样Web应用了。 |
| qin_chao |
2019/5/10 14:32:31 |
| 这个要在delphi的那个版本下运行哦，我下了在xe10.1上不行呢。 |
| 我要发表评论 |
查看全部评论 |
|
|
? |
