Thema: if like

Einzelnen Beitrag anzeigen

Benutzerbild von chaosben
chaosben

Registriert seit: 27. Apr 2005
Ort: Görlitz
1.358 Beiträge
 
Delphi XE2 Professional
 
#4

AW: if like

  Alt 16. Aug 2011, 09:40
Ab in die Ecke und schämen!
Es gibt keine IF-Schleifen.

Ich würde es zweistufig prüfen:
Delphi-Quellcode:
If StartsText('status', input) then
begin
  delete(input, 1, 6);
  if input = 'blathen
    //tu was
  else
  if input = 'blubbthen
    //tu was anderes
end
//edit: arrrgh ... zu langsam
Benjamin Schwarze
If I have seen further it is by standing on the shoulders of Giants. (Isaac Newton)
  Mit Zitat antworten Zitat