关于给Pchar分配内存问题

Delphi(Pascal) code

    function PmacGetResponseA(dwDevice:Cardinal;response:PChar;MaxChar:Cardinal;Command:String):Cardinal

我通过PmacGetResponseA函数来得到response的内容，因为每次的response的大小不一样，所以我就先给
GetMem(response,5000)  
分配5000个字节，但是实际上不是每次都需要5000个字节，然后我maxchar也写的是5000，感觉这样太浪费，有什么办法能动态分配response的大小，不用每次都分配固定的内容5000呢

占个位置学习一下
顶顶帖子，接分中........