Problemer med ShellExecute / winexec

Jeg ønsker at undersøge om der findes et Computernavn på alle IP adresse fra et bestemt start adresse til et bestemt slut adresse. Jeg forestiller mig, at resultatet af hver enkelt test bliver gemt i C:\\IP-TEST.TXT, hvorfra jeg så vil samle det op og slette filen, således den kan oprettes på ny.

Jeg har forsøgt med med ShellExecute og winexec uden held.

Jeg kan godt få nedenforviste til at virke

    Result := ShellExecute(0, \'Open\', \'Netlog.txt\',nil,nil,SW_SHOW);

men jeg kan ikke få næste eksempel til at virke

    Result := ShellExecute(0, \'Open\', \'Ping.exe -a 121.18.10.7 >C:\\IP-TEST.TXT\',nil,nil,SW_SHOW);

Det næste eksempel virker delvist - dvs. den laver et vindue som bliver lukket med det samme og den laver ikke filen C:\\IP-TEST.TXT og med den hastighed den har, tror jeg ikke den laver en ping på den ønkede IP adresse

    Result := ShellExecute(0, \'Open\', \'Ping.exe\',\' -a 121.18.10.7 >C:\\IP-TEST.TXT\',nil,SW_SHOW);

Jeg håber der er en der kan hjælpe mig. På forhånd tak.
Bent