关于button控件的onclick事件

我设置了一个按钮是发送数据的功能，但是数据我想这样发送，就是我点击一下按钮发送前1000个，再点击按钮发送接下来的000，再点击在发送，以此类推，请问怎么做。我现在已经可以点击按钮发送1000字节数据，万分感谢

代码如下，急急急啊
void __fastcall TForm1::ButtonSendClick(TObject *Sender)
{

  AnsiString t,s = Memory->Text.Trim();

  while((s.Length()>0) && (nBytes<=BufSize))
  {
  int p = s.Pos(' '); //空格
  if(p>0)
  {
  t = s.SubString(1,p-1);
  s = s.SubString(p+1,s.Length()).Trim();
  Buffer[nBytes++] = strtol(t.c_str(), &EndPtr, 16); //十六进制字符串转成字节
  }
  else //还剩下最后一个字节
  {
  t = s;
  s = "";
  Buffer[nBytes++] = strtol(t.c_str(), &EndPtr, 16); //十六进制字符串转成字节
  }
  }

 
  YbCommDevice1->WritePackage(Buffer,nBytes); //发送数据包
  }

我设置了一个按钮是发送数据的功能，但是数据我想这样发送，就是我点击一下按钮发送前1000个，再点击按钮发送接下来的1000，再点击再发送，以此类推，请问怎么做。我现在已经可以点击按钮发送1000字节数据，接下来该如何做，大侠帮忙，万分感谢