Wo hier das Else setzten ?

Hamster · Verfasst: Di 18.01.05 00:17

Hallo, auch wenn die Frage etwas doof ist, aber wo setzte ich hier das else ein ?
Also, ist zum serverprüfen .. alles klar .. geht auch, aber nun wollte ich, das er anzeigt ob on oder off.
Das ganze halt im Label serverstatus.

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

procedure TDoExitNow.Timer1Timer(Sender: TObject);
var
  sTemp: string;
begin
  try
    sTemp:= IdHTTP1.Get('http://www.delphi-forum.de');

  except
    on E: Exception do
      serverstatus.Caption := 'Kein Kontakt zum Server!';
  end;
end;

Moderiert von Tino: Topic aus Sonstiges verschoben am Di 18.01.2005 um 12:07

Hamster · Verfasst: Di 18.01.05 00:37

Hab es so gelöst .. war ja auch logisch

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:

procedure TDoExitNow.Timer1Timer(Sender: TObject);
var
  sTemp: string;
begin
  try
    sTemp:= IdHTTP1.Get('http://www.zellenwunder.de');
    serverstatus.Caption := 'Server Online!'
  except
    on E: Exception do
      serverstatus.Caption := 'Kein Kontakt zum Server!';
  end;

end;

hansa · Beiträge: 3079 Erhaltene Danke: 9

Echt toll, wenns auf einmal geht.

Nur, wo ist die Else jetzt ? :shock:

_________________
Gruß
Hansa

Hamster · Verfasst: Di 18.01.05 01:21

Brauch ich dank try ja doch nicht

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme