说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

这是delphi接受IE的url拖放的例子,谁用BCB写出来,送45分,只有这么多了 :(

编辑:说三道四文库 发布时间:2017-10-17 08:22
HTML文档下载 WORD文档下载 PDF文档下载
让自己的程序
可以接受OLE拖放。这需要申明一个COM对象,并支持IDropTarget接口。
下面DragDrop.pas不是我写的:
unit DragDrop;

interface

uses
  Windows, ActiveX, ComObj,Dialogs,Sysutils;

type
  TDropEvent = procedure(Sender:TObject;Msg:Pchar)of object;
  TTMyDrop = class(TComObject, IDropTarget)
  private
    FOnDroped: TDropEvent;
    procedure SetOnDroped(const Value: TDropEvent);
  protected
    {Declare IDropTarget methods here}
    function DragEnter(const dataObj: IDataObject; grfKeyState: Longint;
      pt: TPoint; var dwEffect: Longint): HResult; stdcall;
    function DragOver(grfKeyState: Longint; pt: TPoint;
      var dwEffect: Longint): HResult; stdcall;
    function DragLeave: HResult; stdcall;
    function Drop(const dataObj: IDataObject; grfKeyState: Longint; pt: TPoint;
      var dwEffect: Longint): HResult; stdcall;
  public
    property OnDroped:TDropEvent read FOnDroped write SetOnDroped;
  end;

const
  Class_TMyDrop: TGUID = '{846C94F8-7649-11D2-9836-0000E82EA1B1}';

implementation

uses ComServ,unit1;

{ TTMyDrop }

function TTMyDrop.DragEnter(const dataObj: IDataObject;
  grfKeyState: Integer; pt: TPoint; var dwEffect: Integer): HResult;
var
  enumFormatEtc: IEnumFormatEtc;
  f:TFORMATETC;
  count:Integer;
  Found:boolean;
begin
  dataObj.EnumFormatEtc(DATADIR_GET,enumFormatEtc);
  Found:=false;
  while (enumFormatEtc.Next(1,f,@count)=S_OK)and (count>0) do
  begin
    if (f.cfFormat=CF_TEXT) then
    begin
      Found:=true;
      Break;
    end;
  end;
  if Found then
    Result:=S_OK
  else
  begin
    result:=E_INVALIDARG;
    dwEffect:=DROPEFFECT_NONE;
  end;
end;

function TTMyDrop.DragLeave: HResult;
begin
   result := S_OK;
end;

function TTMyDrop.DragOver(grfKeyState: Integer; pt: TPoint;
  var dwEffect: Integer): HResult;
begin
   result := S_OK;
end;

function TTMyDrop.Drop(const dataObj: IDataObject; grfKeyState: Integer;
  pt: TPoint; var dwEffect: Integer): HResult;
var
  enumFormatEtc: IEnumFormatEtc;
  f:TFORMATETC;
  count:Integer;
  Found:boolean;
  medium: TStgMedium;
begin
  dataObj.EnumFormatEtc(DATADIR_GET,enumFormatEtc);
  Found:=false;
  while (enumFormatEtc.Next(1,f,@count)=S_OK)and (count>0) do
  begin
    if (f.cfFormat=CF_TEXT) then
    begin
      Found:=true;
      Break;
    end;
  end;
  if not Found then
  begin
    result:=E_INVALIDARG;
    dwEffect:=DROPEFFECT_NONE;
    Exit;
  end;
  dataObj.GetData(f,medium);
  if medium.tymed =1 then
  begin
    if Assigned(fOnDroped) then
    begin
      fOnDroped(Self,PChar(GlobalLock(medium.hglobal)));
      GlobalUnLock(medium.hglobal);
    end;
    result := S_OK;
  end;

end;

procedure TTMyDrop.SetOnDroped(const Value: TDropEvent);
begin
  FOnDroped := Value;
end;

initialization
  TComObjectFactory.Create(ComServer, TTMyDrop, Class_TMyDrop,
    'TMyDrop', '', ciMultiInstance{, tmApartment});
end.

在自己的程序中,在FormCreate的时候,加入:

  OleInitialize(NIL);
  dd := TTMyDrop.Create;
  dd.OnDroped:=DoDroped;
  res1 := CoLockObjectExternal(dd, true, false);
  res := RegisterDragDrop(Handle, IDropTarget(dd));

其中,DoDroped在拖放发生时被调用:
procedure TForm1.DoDroped(Sender: TObject; Msg: Pchar);
begin
  ...//此处最好不要有太耗时的工作,因为被拖出的程序(比如说是浏览器)
     //要等待此事件结束
end;

在FormDestroy时:
  RevokeDragDrop(Handle);
  OleUninitialize;





一定要用COM对象吗?
用OLE2 接口就行了吧!
TTMyDrop = class(TInterfacedObject, IDropTarget)
这样用的资源更少,也不用包含与com有关的unit了,只用
包含activex就行了。
也不用产生TComObjectFactory。
没人做过吗?


你最多只能给49分,分数增加后超过了。, ?????????????什么意思?
强烈关注
我也是这样啊!
我想一次给别人一百分,,
但不能害得我分成几次给。。
看来这个问题没人能答

还有几位朋友都想送分,可惜没人能要。

flashGet 和 一拖即存 ,还有聊天宝宝, 网络收藏家都有这功能啊,为什么这就没人会呢?

我是不是该到delphi那边去问? :(
你想要吗?我刚刚写好了一个。呆会给你贴出来。
//////////////////////////////////////////////
//头文件

//---------------------------------------------------------------------------

#ifndef MyDropTargetH
#define MyDropTargetH
//---------------------------------------------------------------------------
#include "oleidl.h"
//---------------------------------------------------------------------------
class TDropBlasketMainForm;
class TMyDropTarget : public IDropTarget
{
public:
    TMyDropTarget(TDropBlasketMainForm* pForm);
    ~TMyDropTarget();
public:
    HRESULT STDMETHODCALLTYPE QueryInterface(REFIID iid, void ** ppv);
    ULONG STDMETHODCALLTYPE AddRef(void);
    ULONG STDMETHODCALLTYPE Release(void);

    HRESULT STDMETHODCALLTYPE DragEnter(IDataObject __RPC_FAR *pDataObj, DWORD grfKeyState, POINTL pt, DWORD __RPC_FAR *pdwEffect);
    HRESULT STDMETHODCALLTYPE DragOver(DWORD grfKeyState, POINTL pt, DWORD __RPC_FAR *pdwEffect);
    HRESULT STDMETHODCALLTYPE DragLeave( void);
    HRESULT STDMETHODCALLTYPE Drop(IDataObject __RPC_FAR *pDataObj, DWORD grfKeyState, POINTL pt,DWORD __RPC_FAR *pdwEffect);
private:
    int m_nRef;
    IDataObject* m_pDataObj;
    TDropBlasketMainForm* m_pForm;

    BOOL IsDataAvailable(IDataObject __RPC_FAR *pDataObj, CLIPFORMAT cfFormat);
};
#endif

/////////////////////////////////////////////////
//实现文件
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "frmDropBlasketMain.h"

//---------------------------------------------------------------------------

#pragma package(smart_init)

TMyDropTarget::TMyDropTarget(TDropBlasketMainForm* pForm)
{
    m_nRef = 0;
    m_pDataObj = NULL;
    m_pForm = pForm;
}
TMyDropTarget::~TMyDropTarget()
{
}

HRESULT STDMETHODCALLTYPE TMyDropTarget::QueryInterface(REFIID iid, void ** ppv)
{
    if (iid == IID_IUnknown)
    {
        *ppv = (IUnknown *)this;
        AddRef();
    }
    else if (iid == IID_IDropTarget)
    {
        *ppv = this;
        AddRef();
    }
    else
    {
        *ppv = NULL;
        return E_NOINTERFACE;
    }
    return S_OK;
}
ULONG STDMETHODCALLTYPE TMyDropTarget::AddRef(void)
{
    m_nRef++;
    return (ULONG)m_nRef;
}
ULONG STDMETHODCALLTYPE TMyDropTarget::Release(void)
{
    m_nRef--;
    if (m_nRef == 0)
    {
        delete this;
        return 0;
    }
    return (ULONG)m_nRef;
}

BOOL TMyDropTarget::IsDataAvailable(IDataObject __RPC_FAR *pDataObj, CLIPFORMAT cfFormat)
{
FORMATETC formatEtc = {cfFormat, 0, DVASPECT_CONTENT, -1, DWORD(-1)};

BOOL bRet = (pDataObj->QueryGetData(&formatEtc) == S_OK);
    return bRet;
}

HRESULT STDMETHODCALLTYPE TMyDropTarget::DragEnter(IDataObject __RPC_FAR *pDataObj, DWORD grfKeyState, POINTL pt, DWORD __RPC_FAR *pdwEffect)
{
    m_pDataObj = pDataObj;

if (!IsDataAvailable(m_pDataObj, CF_TEXT))
*pdwEffect = DROPEFFECT_NONE;
    else
        *pdwEffect = DROPEFFECT_LINK;
    return S_OK;
}
HRESULT STDMETHODCALLTYPE TMyDropTarget::DragOver(DWORD grfKeyState, POINTL pt, DWORD __RPC_FAR *pdwEffect)
{
if (!IsDataAvailable(m_pDataObj, CF_TEXT))
*pdwEffect = DROPEFFECT_NONE;
    else
        *pdwEffect = DROPEFFECT_LINK;
    return S_OK;
}

HRESULT STDMETHODCALLTYPE TMyDropTarget::DragLeave( void)
{
    return S_OK;
}
HRESULT STDMETHODCALLTYPE TMyDropTarget::Drop(IDataObject __RPC_FAR *pDataObj, DWORD grfKeyState, POINTL pt,DWORD __RPC_FAR *pdwEffect)
{
    HGLOBAL  hGlobal;
    LPCSTR   pData;

if (IsDataAvailable(pDataObj, CF_TEXT))
{
STGMEDIUM Stg;
     FORMATETC formatEtc = {CF_TEXT, 0, DVASPECT_CONTENT, -1, DWORD(-1)};
BOOL bValue = (pDataObj->GetData(&formatEtc, &Stg) == S_OK);
        if (bValue)
        {
     TCHAR *strText = (TCHAR*)GlobalLock(Stg.hGlobal);

     AnsiString strUrl = strText;

            m_pForm->AddURL(strUrl);

     GlobalUnlock(Stg.hGlobal);
    GlobalFree(Stg.hGlobal);
        }
}

    return S_OK;
}

//////////////////////////////////////////////
//使用:

在Form1:OnCreate里面:

    m_pDropTarget = NULL;
    m_pDropTarget = new TMyDropTarget(this);
    m_RegisterDragDrop(Handle, pDropTarget);

现在,就可以接受拖放了
首先声明,这部分代码,并不是从delphi那里搬过来的,而是看了mfc的部分代码,自己写成的,里面可能有不少的bug,不过,至少从ie里面,接受url拖放,是可行的了。

我的主业上面,有一个例子。
http://www.shijun.com/iel/cn/download.html
OK, 我测试完后就送分

叶老大, 学了一手,也要给人家送点分哦,不能白拿
试一试,
*.h
//---------------------------------------------------------------------------

#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: // IDE-managed Components
        void __fastcall FormCreate(TObject *Sender);
protected:
    BEGIN_MESSAGE_MAP
        VCL_MESSAGE_HANDLER(WM_DROPFILES, TMessage, trydo)
    END_MESSAGE_MAP(TForm)
    void _fastcall trydo(TMessage &Msg);
private:
            bool drawing;
            int xx,yy;
            // User declarations
public:

        __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif
*.cpp
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void _fastcall TForm1::trydo(TMessage &Msg)
{
char buffer[128];
int i,sum;
sum=DragQueryFile(HDROP(Msg.WParam),0xFFFFFFFF,NULL,0);//获得文件个数
ShowMessage(sum) ;
for(i=0;i<sum;i++)
{
DragQueryFile(HDROP(Msg.WParam),i,buffer,128);
ShowMessage(buffer);//取得文件名
}
DragFinish(HDROP(Msg.WParam));
}
void __fastcall TForm1::FormCreate(TObject *Sender)
{
DragAcceptFiles(Handle,true);        
}
//---------------------------------------------------------------------------
to easypaper() :

   兄台, 您提供的例子我用了一下, 总是有点问题 可以打个包给我吗?
   cool_calf@163.net   QQ:28551
   你的 BatchAdd 做得很不错。 按钮不错。 弹出菜单的兰色条不错。
   可惜在我的机子上运行时出错。

to czylj(夭夭) :
   你列出的程序是什么?


 
使用DragDrop 4.0 ,支持 BCB5.0
RegisterDragDrop之前用OleInitialize(NULL)初始化
接受拖放呀,
不好意思,看错了
coolcalf(牛犊初生):

你遇到的问题,可能就是bilyx所说的,

少了RegisterDragDrop之前用OleInitialize(NULL)初始化 

至于我的程序出错,是很正常的,因为这只是一个程序里面的部分内容,需要其他的程序支持(在我的叶上面有)。
to easypaper() 
咦,怎么http://www.shijun.com/iel/cn/download.html 上不了,说网站没创建的。
To wowboy(星仔):
==================
http://www.shijun.com/cn/iel/index.html
study
移动数据库新疆界:开源、Swift、可穿戴... Chromebook侵蚀微软商用PC市场,成绩喜人 2014微信开发者大会议程公布 8月1日前购票8折优惠并赠书 四火的唠叨:也谈谈全栈工程师 图形化与集成趋势 协同软件致远发新品V5.1 跨平台开发如何事半功倍 Xamarin推出免费培训 《近匠》上海庆科:海尔智能家居背后的云方案 轻松DIY智能硬件,开源电子原型平台Hippo-ADK 所见即所得!基于Polymer的设计工具Mobile UI Elements 好的产品经理是怎样炼成的? 统一架构、统一运维:UnitedStack发布UOS2.0 把轻应用带进汽车——宝马、百度编程马拉松大赛启动 “钢铁侠”Insteon的逆袭:声控智能家居新时代 游戏云纪元 第二届游戏运营技术论坛即将召开 Bitly:构建月处理60亿点击的分布式系统 重塑微软:Satya Nadella开启整合之路 推送工具个推完成B轮数千万美金融资 娱乐行业数据化 ABD爱梦娱乐发布大数据引擎产品 增强现实:10大AR应用窥探移动未来 LBS的硬件创新:高德LBS智能硬件编程马拉松圆满闭幕 2014优秀微信开发商评选上线 首批旅游汽车电商房产等行业应用出炉(表) 让梦想照进现实——宝马百度编程马拉松闭幕 IXDC大会:移动交互设计精髓——用户体验 想辨析“马航”等事件真伪,有很多技术和工具可以使用 两倍于IBM的基础设施投资,Google大力发展云服务 听云平台发布移动应用性能黑洞报告 微信开发者大会陶瑾:如何玩转微信支付功能的原理和开发 560亿PV+7.3亿用户,Reddit是如何做到的? 打造安全界的希波克拉底誓言文化 极客的春天来了! Mozilla COO宫力:老牌操作系统如何助力新一代智能电视 App提高用户留存率新招:应用性能监测 vb访问数据(sql server)时出现数据只读 关于sql语言左连接的问题,help 请问java里边一个截取String的问题 没有相对应的菜单信息,这是怎么回事呀? XML文件里面只能有英文? 为何我删除一万条纪录也会提示数据库事务日志已满? 有关Table控件动态添加row的问题!!!! 我开发了一个计算机安全产品,谁能帮我申请一下计算机安全产品销售许可证?? 为什么mysocket.Connect()函数返回0仍然建立了连接? 我错过了看 <我从校园出来的这几年>,现在找不到了.请各位指点 EXCEL中表达式求值? -->>50分一个小问题:如何改变一个只读属性文件夹为可写属性文件夹? 应用程序运行出错的问题:字体变大,网页变形,残不忍读! 帮朋友做的网站自动生成系统,大家提提意见 vb访问数据(sql server)时出现数据只读 能够登陆但是使用出错的问题!!!急!!!!!! 请问有一VC执行程序 但是老出错,有什么办法可以得到原代码 或者是查看内部运行原理然后修改某接口吗?多谢 如何在服务器端获取手机号码! 如何用java把日期插入数据库,要变成字符吗 在线等待!!!!!!!!!!!!!!!!!急!!!!! 高分请教高手,如何让oracle 8i自动执行一段已经写好的sql??? modem编程的问题? TMD,还真是热闹啊,没有我的份怎么行,哈哈!!!!!! 请问各位你们是多大才想到好好学习的?也可以说是学习上开窍的,我儿子今年10岁,只想玩,如何让他意识到学习才是他的主业,玩是副业? 如果Session为过期或者为空,强制返回登录页,应该怎么写?在那里写? 请各位大侠赐教,急用!!!数据库查询问题 两个可能常用的技巧,要你解决!:) 问的问题没人回答,可否删除帖子? 再PB环境中,数据窗口打不开,急!!!! 公司正在成立===问题大家解决 请问有三个Radio按钮,名字都叫radioTest,值不同,我想在提交表单之前得到被选中的Radio的值,如何实现 应用程序运行出错的问题:字体变大,网页变形,残不忍读! 如何关闭excel 请大家谈谈J2ME和J2EE的发展 主键重复,在存储过程中怎么抓不住 负载很重的FreeBSD服务器,运行Apache和cgi程序,大家有什么好主意么? 关于samba,求助 问题:有没有谁想过通过读取(伪)汇编码把相应的C代码恢复出来? jceweb.ear ,JCE_Test_Web.war 两个存储过程问题,一个是除0溢出,一个是删除问题 触发器设置问题~急呀! 结合 jsp-->Excel ? 请问 高手请进,急,在线等待! 网站数据文件(.mdb)在FAT32系统正常,在NTFS系统打开后只读 如何快速求平面上的两条线段是否相交? 请问ADO能用在ActiveX DLL中吗? ~~高分求救!~~~如何调用本地硬盘上的EXE文件??? 一个关于数据库的小问题,为什么不能正常运行!请网友给于帮助! 视图中列显示的问题 哪位大虾知道如何编程获得及设置ODBC中SQL Server数据源的密码? 为什么和书上介绍的不一样?进行不下去了 谁为维护祖国领土完整作出过贡献? 相距为L的两个质点A,B,质量分别为m1,m2,则此系统的质心距A的距离为? 水尝无华 相荡乃成涟漪,石本无火 相击而成灵光 是什么意思 今天不小心嘴唇上溅到了些化学溶剂,立刻擦掉了,但是当时没有用水冲洗,会不会对身体有影响呀? 结合生物多样性写家乡的短文“一座座青山紧相连.一片片白云绕山间.谁不说俺家乡好.”很多同学一定听过着首优美的歌曲.家乡的一草一木都那么让人眷恋.请结合所学生物多样性的知识写 张叔叔购买了一套住房,采取分期付款方式:一种付款方式是第一年先付50000元以后每年付10000元;另一种付款方式是前一半时间每年付款14000元,后一半时间每年付款10000元,两种付款方式的付 联系的客观性原理.急用! 空压机油水过多怎么处理?空压机已经配有一个油水分离器,但通过油水分离器后的风还是有很多油水,每2-4个小时放水一次都解决不了问题.通气管道有将近50米长,使用风枪时吹出来的气有时明 1纳米有多大 打雷的时候为什么会跳闸 空气压缩机排出的废气对人体有害吗? 纳米尺寸是多少 武汉哪里有20%人血白蛋白急,医院药房都可以人命关天的事,不要只是一个复制粘贴!不然我宁愿弃分. solidworks中零件方向或者朝向的改变(坐标系不会跟着变化)solidworks中我选择前视基准面绘制了一个矩形,然后凸台拉伸成一个长方体,我再新建一个零件,选择前视基准面绘制了一个圆,然后凸 纳米尺度是什么 咩话是啥? cloud是什么意思 宋老师购买一套商品房,采取分期付款方式,一种付款方式是:开始第一年先付4万元,以后每年付款1万元;另一种方式是:前一半时间每年付款1万4千元,后一半时间每年付款1万1千元,两种付款方式 人血白蛋白保存我朋友在山东买的带到黑龙江去了 用矿泉水冻的冰块保存的,一直的温度都是零下,病人注射没什么作用 是不是冻了后就不能用了 cloud的中文意思是什么 当手被针扎感到疼痛,这种感觉为什么形成于大脑皮层,这种反射不是不经过大脑考虑的吗,我觉得应该是脊髓的神经中枢,我相信自己的想法是正确的,一定是教科书写错了 古人说“一个人时也要洁身自爱”的词语是“独×××”? 怎样防止竹制品发霉我朋友用竹筷子给我给我做了一个相框,刚开始他用酒精擦拭,可是一个星期回家后就发现它发霉了,该怎么做才不会发霉?(麻烦写清楚简单点的) TMY究竟是什么样的意思经常看到电气图纸上有这个字母,一直都理解为铜排的规格, 打雷跳闸怎么回事? cloud 什么意思cloud 什么意思 在脊椎受损的时候,用针刺手会没有感觉,是因为大脑皮层是形成感觉的地方吗?如果大脑皮层是形成感觉的地方,那么感受器的作用是什么?感受器这个地方不会形成感觉吗?我有点搞不清楚大脑 规律的客观性可以划归为高中哲学内容的哪个版块?在做题中如何区分? 硅胶干燥剂和彭润土干燥剂的吸附率多少才达到欧盟国家的要求? LMY啥意思 问古人语录的作者1.风声、雨声、读书声,声声入耳;家事、国事、天下事,事事关心.2.天下初定,百姓财力俱困,比犹初飞之鸟,不可拔其羽;新植之木,不可摇其根.要在安养生息之.3.城存与存,城 red是什么意思? 导线标注LMY什么意思 求古人对”错过”的态度的语句 如何去除竹器发霉味道我有一个竹制的 茶盘,前几天拿出来的时候,发现发霉了,味道很大,我用清水加洗洁精刷过,又晾晒了一周多,现在还是有很大的味道,怎么办? 铝散热器表面是要做化学氧化还是阳极氧化,两种处理方式对辐射散热有很大影响吗?做好的散热器怎么辨别是哪种氧化? 古人骂人的经典语句很少了解古人是怎么骂人,所以望大家一起研究下. 竹制品在什么条件下不会发霉?把竹子做成竹产品时,如果没有及时烘干或晒干一两天就发霉了,请问有什么办法防止竹制品发霉呢?产品是各类竹签半成品、牙签等 张老师买一套商品房,如果分期付款需加价5%,如果一次性可享受九折优惠,两种不同的付款方式房价相差3万元.这套商品房售价多少万元? 为什么打雷有的会跳闸有的不会 质心是质点系_____的中心. 特别的奖励"宋老师是一位怎样的老师" 不打雷也跳闸,这是为什么? 竹制品为什么易发霉?什么科学原理? 谢谢 【物理】山区某工地上,其照明电路需用单芯导线从离工地250m处的电源引来工地上要用一只220V100W的灯泡来照明,所用的单芯导线的电阻为每米0.018欧.如果电源两端的电压为220V且保持不变,试求 打雷 一楼不跳闸打雷的时候,不管有多响,一楼的开关都没跳过,只有二楼和三楼的开关跳闸了.按开关的试验按钮都能够正常脱扣, 质心的动能可以代替各个质点的动能吗?为什么?质心的速度不是通过动量的角度来定义的吗?矢量和相等的话不能就证明动能相等了吧?我遇到一道题,是一个刚性轻杆两段有两个小球,质量相等. 家庭电路中,单芯与多芯导线哪种好?为什么? 化学试剂店里卖的柠檬酸可以当做食品添加剂来用么 叶绿体是否可从植物中提取 为什么电缆的线芯要采用多股导线绞合形式? 怎样与古人语言交谈怎样与古人就像面对面的交谈 取叶绿体标本最好在植物叶片哪个部分取得?. 水尝无华 相荡乃成涟漪,石本无火 相击而成灵光这句话的意思 某些试剂能使生物组织中的有关化合物产生特定的颜色反应,大概有哪些 打哈欠是受大脑皮层控制么打"哈欠"是在大脑皮层的"指挥"下加速吸入新鲜空气,呼出体内代谢产生的CO2为什么错了? 王阿姨家购买了一套住房,采取分期付款方式:一种付款方式是第一年先付50000元,以后每年付10000元:另一种付款方式是前一半时间每年付款14000元,后一半时间每年付款10000元,两种付款方式的 英格索兰空压机排气温度低,分离桶里面全是冷凝水和油产生的白色液体,该怎么解决?机型22KW “刚体平动时,可将全部质量集中于质心,作为一个质点计算其动量矩”的理解 水尝无华,相荡乃成涟漪;石本无火,相击而发灵光 是什么意思?(谢谢) 多国对美国监听表达不满要求解释 研究西班牙称遭大规模监控难以接受 促美公尼泊尔政客涉嫌谋杀同党候选人 两印度尼泊尔政客涉嫌谋杀同党候选人 两印度叙利亚问题联合特使卜拉希米抵达大马士浙江一盗销柴油团伙五分钟能使满箱柴油拆东墙补西墙 浙江一男子非法集资14李克强会见德国友人多国对美国监听表达不满要求解释 研究突尼斯政治纷争致市政荒废 街头成“垃俄官员说中国是俄旅游领域主要战略伙伴四川南充男子驾中巴强冲交警队和法院 俄官员说中国是俄旅游领域主要战略伙伴张高丽会见美国能源部长莫尼兹外交部:国际社会应尽早制定网络空间行赵洪祝会见尼泊尔客人范长龙会见巴基斯坦陆军参谋长华媒:揭秘核潜艇部队剑有所指 新海军中国核潜艇部队42年来首次揭秘 打击揭牌首月 上海自贸试验区登记企业同比21世纪理事会将就“读懂中国”展开讨“金色护栏” 或推广到北京之外手工祭品融入现代元素, 比巧比美“防冲撞金色护栏”或将大范围安装91岁大慈善家余彭年发大火打官司刘建宏要离开央视了食用后严重损害健康要紧急召回如何看人均税负6338.76元?参建单位能陪着建筑慢慢变老吗好的工作不会没人干美国一名少将在阿富汗 被“制服杀手”感染埃博拉病毒美国医生 亲试新药神奇重庆市民可用手机 举报领导干部职务犯男子被妻屡施家暴 法庭上哭求离婚有“特殊关系”办社保 这个中年男专骗鲁甸震区村民:牛栏江汛期也没有现在的市级文保单位12年未挂牌? 清进士许番禺万博CBD沦为尘都三天雨水过后 秋老虎就要来了广州8镇入选全国重点镇编假名寄毒品两人被批捕男子酒驾撞死人逃回酒店睡觉 同车数人
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘