You could do something like this:
Code:
string:filename;
for i=1 to 10000
{
filename=IntToStr(i)+.PNG;
while length(filename) < 12 filename='0'+filename;
//write file here
}
where 12 is whatever lenght you want to give the filename including the .PNG extension.