Prüfen ob string auf '.exe' endet

[Ydobon]

Wenn in XE 2 schon dabei,
function EndsText(const ASubText, AText: string): Boolean; aus den StrUtils. Ignoriert von sich aus die Schreibweise.

Edit: Die Aktualisierung der Beiträge im Forum könnte etwas schneller sein.