---
url: >-
  /statelake/scripting-reference/functions-and-procedures/string-functions/removeleadingzero.md
---

# RemoveLeadingZero

**RemoveLeadingZero** removes any leading zeroes from **S** string.

Converting a string with leading zeros will also remove them.

**Declaration**: Function RemoveLeadingZero( S : String) : string;

An example follows.

```pascal
procedure OnMapEvent(var Value:Variant);
var
  Str1, Str2 : string;
begin
  Str1 := RemoveLeadingZero('00000123');                  //returns '123'
  Str2 := RemoveLeadingZero('00000This is a test');       //returns 'This is a test'
end;
```