Stačí se podívat na deklaraci v první části formuláře:
Ping: TIdIcmpClient;

Ted jsem si otevrel knizku s priklady a ctu:
Poslouzi nam k tomu ta sama komponenta IdICMPClient...

TForm1.Trace je procedura. Musis v private casti formulare deklarovat:
procedure Trace;

lvTrace.Items.Clear je smazani polozek nejake komponenty. Podle nazvu soudim, ze jde o ListView. Takze na formular pridas TListView, nastavis jej do stylu Report a pojmenujes jej jako lvTrace.