C language to Delphi

newbie in delphi;

i want to convert codes like this one..
can anybody give my an idea...

c lang.

Code:

---

void main()
{
             
        char dest[20];
        int i;
 
        for (i=1; i<8; i++)
        {
                obtain_code_lib (i, 2, "111111111111119", "22222", "034144", dest);
                printf("#pw+%s+%u#\n", dest, i);
        }

        printf("\n\n");

        for (i=1; i<8; i++)
        {
                obtain_code_lib (i, 7, "111111111111119", "22222", "034144", dest);
                printf("#pw+%s+%u#\n", destino, i);
        }
}

---

i want it to code in delphi.



TIA