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

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

编辑:说三道四文库 发布时间:2017-03-27 12:59
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
Facebook觊觎微信鼻祖WhatsApp,但谈不上收购 首款社交API应用 Facebook Messenger for Firefox正式上线! 共享软件海外营销策略与实战分析(沈阳站)成功落幕 移动之伤:为什么山寨游戏比原创更火? IBM在京发布PureData 主打数据交易处理、操作分析 Intel发布Hadoop免费版 全力拓展生态圈 突出图片搜索:微软向测试人员开放Socl社交搜索 豌豆荚创始人:和巨头竞争,我们拼产品和技术 “互联网女皇”报告解读:智能电视大趋势 苹果扩大其北卡罗莱纳州燃料电池发电场规模 Oracle回收站使用全攻略 微软这次很诚实:IE真的糟透了 Facebook进军短信业务,挑战微信鼻祖WhatsApp 从菜鸟到专家的五步编程语言学习法 亚马逊企业文化:从书贩到云服务巨头的催化剂 明年Google I/O大会日程敲定 或发Android“酸橙派”? 绝境求生,WebOS寄望Android Facebook在移动路上走过的那些弯路 曙光聂华:推动数据融合 CloudStack Committer李学辉:2013年社区将爆发 继续霸权:美众院否决联合国掌控互联网 墨迹天气创始人金犁:巧用细分市场的力量 Windows 8的IE10在浏览器安全测试中独占鳌头 程序员如何做出“不难看”的设计 JDK6明年2月停止更新,甲骨文呼吁尽快升级至7 《时代》评选年度十大视频游戏,激战2居首 《时代》评选年度十大科技产品,iPhone 5居首 Loopjoy:让开发者在移动游戏里贩售真货 iPhone 5S真机照片泄露 明年初上市 Beeline:从“蓝精灵村庄”到“捉鬼敢死队” Windows Server 2012域服务的六大改进 如何用AVIFileOpen打开MPEG-1文件,100分相谢 大型文件的局部修改 国际域名和空间转让 vc中如何访问数据库表中的blob大对象? 请教一个j2ee的三层问题 微软专家:在什麽情况下Priv.edb会突然增加一倍? 如何设置com的权限? 急!没有人回复我吗? 怎么在windows的鼠标右键中加入如“open”等功能。 vc中如何访问数据库表中的blob大对象? 我狂,所以我说!——国内游戏编程噪音之我见!(大家来扁我啊!) ClientDataSet问题,程序退出一定要Close吗?不退出有关系吗?它会自动free吗? 如何进行技术收藏? 谁能告诉我?24小时在线恭候! 表格问题 如何进行技术收藏? 吐血推荐美凤火爆录象(rm),建议用网际快车下载!保证能下载! 我要租房:三四环之间 有志之士请进 关于g++的问题 谁遇到果pb7数据窗口中图片的打印、打出来是全部黑色的。请问各位高手怎么打印图片? 求教:我学WinInet,编译的时候出现HINTERNET类型没定义,请教是否要加特定的头文件或其他问题 熟悉True Dbgrid的朋友请进! 急呀!神呀,快进来看看吧!!! 俺安装了Red Hat Linux7.2(Workstation)Java,和web(tomcat)服务器应如何配置,清指教! JB6+weblogic6怎么配置? 家庭的ISDN专线上网口和一般的电话线的口有什么不同? 怎样实现全屏(单文档) 页面中能否控制鼠标 调用组件返回这个代码是什么意思? WSAAsyncSelect是不是非的要窗口句柄作参数??线程句柄行不?? 关于文字宽度处理的问题 clientdataset插入记录时的错误,请教,急!!!!! 分布式开发Com+问题,高分请高手解答 !!!关于RedHat7.2下播放VCD的问题? 如何判斷xml文件中某節點下是否還有子節點﹐ 如有并判斷是否有指定子節點? 有关明细表的问题? 谁编过可以截获别人email的软件,能不能帮个忙给一个需求分析的样本?真正有意者可以兼职,给予一定报酬,谢谢了,内详,安全,系统,IDS 60分求救,对你们也许很简单,硬盘分区的问题: 如何用AutoCAD进行二次开发一个小规模电路的专业CAD? 谁编过可以截获别人email的软件,能不能帮个忙给一个需求分析的样本?真正有意者可以兼职,给予一定报酬,谢谢了,内详,安全,系统,IDS delphi with excel 什么是。net框架的计算机? 急,高手帮我看看有关SMTP的发信程序!谢谢!! 谁编过可以截获别人email的软件,能不能帮个忙给一个需求分析的样本?真正有意者可以兼职,给予一定报酬,谢谢了,内详,安全,系统,IDS 为什么会出现以下错误 我的报表控件不能用了,大家快帮我想想办法,很急、、、 SOS!我急需3ds680显卡驱动,哪位大侠能提供,或者给出解决方案,谢谢! 谁编过可以截获别人email的软件,能不能帮个忙给一个需求分析的样本? 真正有意者可以兼职,给予一定报酬,谢谢了,内详,安全,系统 如何刪除Mssql server數據庫中的图片呢(singkwok) 这个SQL语法有什么错误呢? 弗洛伊德说 本能有生本能、死本能,可马斯洛的解释本能有5个层次,没一个像死本能的啊,谁来解释一下最近对心理学强烈感兴趣,弗洛伊德的心理学讲到 本能有生本能和死本能,可马斯洛的本 人共有几大本能,分别是什么 怎样在反应式判断氧化物质1)一个反应式中经常一个元素分配到两种物质里,例如某个反应物中有X物质,而生成物中都有X物质,反应物中的X跟一个生成物中的X化合价比升高了,跟另一个生成物 动物的行为按其本能分为哪些类型 人的本能最多的指的是什么? 在无色透明液体中可以大量共存的离子组是:( )A.H^+,K^+,Fe^2+,NO3^-B.OH^-,Cl^-,Na^+,NH4^+C.Cu^2+,NO3^-,OH^-,Cl^-D.Mg^2+,K^+,Cl^-,NO3^-符号^表示后面的东西在前面的东西的上方. 《弗洛伊德本能成功学》的读后感 人的天性本能是什么如题 我想很多,它是由自己出发的,别人不能认可的. 一道有关离子共存问题的选择题.某强酸性溶液中可能存在NO3-、I-、Cl-、Fe3+中的一种或几种.向该溶液中加入溴水后,溴被还原,由此可推断该溶液中( )A.不含NO3-,可能含Fe3+B.含有NO3- 、I- 、Cl-C 性行为是人的本能吗? 激动是人的本能吗?激动是人的,但不全是人的特征,动物也会激动的 1—6选择题快速求解答 锌与盐酸反应方程式 检验HCl中Cl离子加入硝酸银,生成氯化银沉淀,为什么还要加入硝酸? 铁与什么反应生成硝酸亚铁?铁与什么东西反应生成硝酸亚铁? 如何判断氧化还原反应中的氧化产物和还原产物? 含有氧元素物质参加的反应是否一定是氧化反应或还原反应?若不是 请举出反例`````化学式````` 检验氯离子的存在:先用硝酸银 若产生沉淀 则有可能是氯化银或碳酸银 再用稀硝酸 可是为什么不能用盐酸呢话说这是初三的科学 只用考虑氯化银和碳酸银的情况 这种情况如何判断是氧化反应还是还原反应?一个化合物,其中一种元素的化合价相对于这种元素在另一个物质的化合价升高了,另一种元素的化合价相对于这种元素在又另一个物质的化合价降 在氧化还原反应中,被还原或氧化的是物质还是元素? 假金为锌铜合金,利用金属能与氧气,酸,盐反应有三种鉴别假金的方法.用三个化学式说明 金属铜可以和什么反应 氧化反应,还原反应的定义 氧化反应:元素化合价——,——电子,发生——反应 还原反应:同上(填空) 关于锌和碘反应的问题————化学高手请进怎样操作能使锌和固体碘在水催化下反应明显(有紫色的碘蒸汽出现),在小烧杯里水放多少、锌放多少、碘放多少,以及先后顺序;碘、锌是粉 金属铜与水反应的问题!我手上有块小铜片,对我意义深刻!我用红绳挂在脖子,却担心我洗澡的时候金属铜与水反应!并且有CO2和O2存在下,可发生下反应,生成绿色的碱式碳酸铜.生成碳酸铜后,我 在氧化还原反应中有一种元素被氧化是不是伴随着另一种元素被还原 若在加入铝粉能放出氢气的无色溶液中,分别加入下列各组离子,可能共存的是A.NH4+ NO3- CO2- Na+ B Na+ B Na+ Ba+ Mg+ HCO3-C NO3- Ca2+ K+ Fe3+ D No3- K+ AlO2- OH-理由 含有ag硝酸的稀硝酸中,加入bg铁粉充分反应,铁全部溶解,生成一氧化氮,已知有a/4g硝酸被还原,则a:b不可含有ag硝酸的稀硝酸中,加入bg铁粉充分反应,铁全部溶解,生成一氧化氮,已知有a/4g硝 在氧化还原反应中,有一种元素被氧化,另一种元素一定被还原吗 弗洛伊德的精神分析法, 含有ag硝酸的稀硝酸中,加入bg铁粉充分反应,铁全部溶解,生成一氧化氮,已知有a/4g硝酸被还原,则a:b不可能是 A.2:1 B.3:1 C.4:1 D.9:2 如图所示,数轴上点A,B,C,D分别对应有理数a,b,c,d,其中A和B关于原点对称,1化简根号下(-a+3b)b^21化简根号下(-a+3b)b^22.求值3a+2c+d+2 绝对值c-d+根号下(b-d)^2 法律源于人的自卫本能 RT 高一化学关于双线桥的得失电子.那个得失电子请问怎么算有多少个啊?麻烦用KMnO2=2K2MnO4+MnO2+O2↑这个式子讲解一下吧. 已知有理数a、b、c在数轴上(0为数轴原点)请化简:|a|-|a+b|+|c-a|+|b+c|—a——b————0———c——→ 语文分数划分 选择题一共几分 ,几分一题 ; 作文几分 .额 浙江高考 判断一种有机物是否能发生氧化或还原反应的依据? 下列物质分别与氧气反应,写出化学反应式及实验现象木炭硫镁磷铁 CCNA考题的分数是如何划分的?比如选择题几道,实验题几道, 下列反应物中,有机物发生还原反应的是()发生氧化反应的是()1由乙醇制取乙醛 2由乙醛制取乙醇 3乙醛的银镜反映 4甲醛与新制的的氢氧化铜反映 5乙烯与氢气加成 6乙炔使酸性高锰酸 什么叫本能的活着?如何本能的活着? 【高三化学】一道关于物质分类的选择题》》》判断下列正误,并选出正确的选项( )(并解释选项)(A)向鸡蛋溶液中滴入饱和硫酸钠溶液,析出白色沉淀是化学反应(B)向鸡蛋白溶液中 有机物被还原,是发生了还原反应还是氧化反应?如题 生存为什么是所有生物的本能 【高三复习】物质的分类的一道选择题》》》下列错误的是( )(不限定数目的多选),括号后为我的疑问(A)CaC2,Na都为为遇湿易燃物品(B)高锰酸钾,K2Cr2O7都为氧化剂(C)杂多酸盐Na2HPW1 所有常温下能和水反应的金属有哪些 假如爱情是人的本能,生存是生命的过程,无论是否恋爱,每个人都要面对生存,为什么人们都希望用爱情来改变生如题,想请问各位专家,爱情存在的形式是根据社会形式的变化而变化的吗?难道一 若在加入铝粉能放出氢气的溶液中分别加入各组离子,可以大量共存的是AB可以排除.C Mg NO3 K Cl(注意都是离子)D K Cl Na SO4答案是D,C为什么错误?C项如果是H+使Al产生氢气,那么除了形成硝酸,不 Cu、Ag和HNO3反应能生成NH4NO3吗 活着除了本能还为什么?不管是为了明天还是现在,到最后等待的都只是一个黑盒子,亲人将在身边一个个的离开,所能获得的只有思绪和哀愁,也许快乐可以充斥一时,但终替不了这令人绝望的结 本能与道德有什么联系?如果两者产生矛盾会出现什么现象?又如评价这一现象, 为什么加铝粉有氢气就有氢离子或氢氧根离子请详解 死亡的本能与生命的本能一个人由于一定的原因不可能去结婚,也由于疾病的原因不可能有工作的前途,未来是一片无光的黑暗.唯一让这个人存活的原因是这个人对这个世界的一切都不感兴趣, 文化与本能关系? 铝与氢氧根能反应吗是铝,不是铝离子 怎么判断一个反应是氧化反应还是还原反应? 本能1和本能2有关联吗? 若有理数a、b、c在数轴上的位置如下图所示,其中0是原点.(2)化简:|c+a|+|b-c|-|b-a|--a---------------b----0---------c------------> 人的本质和本能是什么? 如何判断是不是氧化反应注意 不是判断氧化还原反应 、单单只是氧化反应!有机部分的下列反应中 属于氧化反应的是()A RCHO+H2 生成 RCH2OHB CH2==CH2+H2 生成 CH3CH3C 2CH3CHO+O2 生成 2CH3COOHD 2CH3CH2OH+
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘