Ping

[Maeuschen]

Hallo

Ich wollte mehr oder weniger ein Reaktionsprogramm schreiben, dass wenn ich auf einen Startbutton klicke die Reaktionszeit des Pings angezeigt wird inkl. Auswertung. Ich glaube ich posten mal gleich den Code mit, sonst weiß sicher niemand, was ich überhaupt will ^^; *keine Fachbegriffe beherrscht*

Delphi-Quellcode:

procedure TFormular.BStartClick(Sender: TObject);
begin
  BStart.enabled:=false;  
  PBewertung.visible:=false; 
  try {
Process pr=Runtime.getRuntime().exec("ping ...");}   //Versuch Computer anzupingen
  TUhr.enabled:=true;     
  EReaktion.text:='';     
  EStartzeit.text:='';
  EStopzeit.text:='';
  PBewertung.caption:='';
end;

Wie ich schon oben schrieb wollte ich, sobald ich auf einen Button klicke die Reaktionszeit des Computers in meinem Edit Feld erscheinen lassen inkl. Bewertung.
Nun weiß ich nicht, ob mein Pingbefehl überhaupt richtig ist. Wenn ja, besteht immernoch das Problem, dass er mir mein "end;" nicht annimmt.

Da sich hier so viele Experten auf diesem Gebiet herumtreiben bin ich frohen Mutes und warte auf eine Antwort. Danke schonmal im Vorraus ^^