copy leftstr

场景:copy,leftstr,pos哪儿效率更高

copy,leftstr,pos哪里效率更高
如题, 这三个函数谁的效率更高.

比如下面:
我卡一个字符串的前置码.
Str := '1234567';
if copy(Str, 1, 4) = '1234' then
  ShowMessage('OK');

if LeftStr(Str, 4) = '1234' then
  ShowMessage('OK');

if pos('1234',Str) > 0 then
  ShowMessage('OK');

这三种方式谁的效率更高? 或者有其他效率更好的方式.
麻烦哪位告诉我下, 非常感谢!

------解决方案--------------------
经测试,函数执行效率是一样的