剪贴板的问题，Empty时出错

[yeahe83]

写了剪贴版的按钮事件，
按第一次可以改变剪贴板的内容，但是再按就出错，
似乎是EmptyClipboard的时候，
请教。

void __fastcall TForm1::Button1Click(TObject *Sender)
{
try
{
ShowMessage("Open");
OpenClipboard(Handle);

if(IsClipboardFormatAvailable(CF_TEXT))
{
GLOBALHANDLE hGlobal = GetClipboardData(CF_TEXT);
char* pGlobal = (char*)GlobalLock(hGlobal);
MessageBox(Handle, pGlobal, "Original", NULL);

strcpy(pGlobal, "替换后的文字");
GlobalUnlock(hGlobal);

ShowMessage("Empty");
EmptyClipboard();
SetClipboardData(CF_TEXT, hGlobal);
}
else
{
ShowMessage("Nothing");
}
}
__finally
{
ShowMessage("Close");
CloseClipboard();
}
}

[菜牛]

把EmptyClipboard()去掉。

另外，你能够保证hGlobal指向的内存能够容纳你的字符串吗？最好释放原来的内容，重新申请内存。

[yeahe83]

又要分配一个hGlobal...这样倒是可以。

void __fastcall TForm1::Button1Click(TObject *Sender)
{
try
{
ShowMessage("Open");
OpenClipboard(Handle);

if(IsClipboardFormatAvailable(CF_TEXT))
{
GLOBALHANDLE hGlobal = GetClipboardData(CF_TEXT);
char* pGlobal = (char*)GlobalLock(hGlobal);
MessageBox(Handle, pGlobal, "Original", NULL); //show original in clipboard
GlobalUnlock(hGlobal);

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

char *pString = IntToStr(rand()*rand()*rand()*rand()).c_str();
GLOBALHANDLE hNewGlobal = GlobalAlloc (GHND, strlen(pString)+1);
char* pNewGlobal = (char*)GlobalLock(hNewGlobal);
strcpy(pNewGlobal, pString);
EmptyClipboard();
GlobalUnlock(hNewGlobal);
SetClipboardData(CF_TEXT, hNewGlobal);
}
else
{
ShowMessage("Nothing");
}
}
__finally
{
ShowMessage("Close");
CloseClipboard();
}
}

[yeahe83]

我有问题，GetClipboardData返回的是一个普通的HANDLE还是GLOBALHANDLE？
要不把它GlobalReAlloc？呵呵