如何把一个字符串填充到一个无类型的指针 - 回复 "豪杰的爸爸" 的问题

本文主要是介绍如何把一个字符串填充到一个无类型的指针 - 回复 "豪杰的爸爸" 的问题，对大家解决编程问题具有一定的参考价值，需要的程序猿们随着小编来一起学习吧！

如何把一个字符串填充到一个无类型的指针 - 回复 "豪杰的爸爸" 的问题
问题来源: http://www.cnblogs.com/del/archive/2008/11/08/1329543.html#2016234

---

procedure TForm1.Button1Click(Sender: TObject);
var
  p: Pointer;
  str: string;
  size: Integer;
begin
  str := Edit1.Text;
  size := (Length(str) + 1) * SizeOf(Char);
  p := GetMemory(size);
  ZeroMemory(p, size);
  CopyMemory(p, @str[1], size);
  ShowMessage(PChar(p));
  FreeMemory(p);
end;

---

posted on 2011-01-21 17:43  万一  阅读(1913)  评论(1)  编辑  收藏

这篇关于如何把一个字符串填充到一个无类型的指针 - 回复 "豪杰的爸爸" 的问题的文章就介绍到这儿，希望我们推荐的文章对大家有所帮助，也希望大家多多支持为之网！