Advertisement
WarPie90

Untitled

Apr 21st, 2017
459
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Delphi 0.15 KB | None | 0 0
  1. procedure Foo(x:array of Byte); overload;
  2. begin
  3. end;
  4.  
  5. procedure Foo(z:Int32; x:SizeInt); overload;
  6. begin
  7. end;
  8.  
  9. var i:Int32;
  10. begin
  11.   Foo([1]);
  12. end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement