AGB  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Prüfen ob string auf '.exe' endet

Ein Thema von zobien123 · begonnen am 19. Mai 2017 · letzter Beitrag vom 19. Mai 2017
Antwort Antwort
Seite 1 von 2  1 2   
zobien123

Registriert seit: 3. Mär 2017
Ort: Öhringen
32 Beiträge
 
Delphi XE2 Professional
 
#1

Prüfen ob string auf '.exe' endet

  Alt 19. Mai 2017, 10:04
Hi

folgendes Problem: Ich möchte einen String aus einem Edit-Feld prüfen, ob er auf '.exe' endet, wenn nicht soll '.exe' angehängt werden. Gibt es irgendwie eine Funktion, mit der man von rechts nach links die Zeichen überprüfen kann, ob diese '.exe' sind?

Vielen Dank für eure Antwort
Jörn
Linux wird nie das meistinstallierte Betriebssystem sein, wenn man bedenkt, wie oft man Windows neu installieren muss!
  Mit Zitat antworten Zitat
Benutzerbild von Neutral General
Neutral General
Online

Registriert seit: 16. Jan 2004
Ort: Bendorf
4.497 Beiträge
 
Delphi 10.1 Berlin Starter
 
#2

AW: Prüfen ob string auf '.exe' endet

  Alt 19. Mai 2017, 10:10
if AnsiLowerCase(ExtractFileExt(str)) = '.exethen
Michael
"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."
  Mit Zitat antworten Zitat
Poelser
Online

Registriert seit: 21. Apr 2008
Ort: Eggebek
75 Beiträge
 
Delphi 10.1 Berlin Professional
 
#3

AW: Prüfen ob string auf '.exe' endet

  Alt 19. Mai 2017, 10:18
Einfach aus SysUtils ChangeFileExt die Extension ändern. Wenn die bereits auf .exe lautet, bleibt sie so wie sie ist.

HTH, Poelser
  Mit Zitat antworten Zitat
Aviator
Online

Registriert seit: 3. Jun 2010
1.018 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#4

AW: Prüfen ob string auf '.exe' endet

  Alt 19. Mai 2017, 10:22
Einfach aus SysUtils ChangeFileExt die Extension ändern. Wenn die bereits auf .exe lautet, bleibt sie so wie sie ist.

HTH, Poelser
Das ist aber sehr radikal. Welchen Vorteil erhoffst du dir davon?
  Mit Zitat antworten Zitat
zobien123

Registriert seit: 3. Mär 2017
Ort: Öhringen
32 Beiträge
 
Delphi XE2 Professional
 
#5

AW: Prüfen ob string auf '.exe' endet

  Alt 19. Mai 2017, 10:23
Zitat:
if AnsiLowerCase(ExtractFileExt(str)) = '.exe' then
Klingt gut, jedoch bekomme ich eine Fehlermeldung:
Zitat:
E2015 Operator ist auf diesen Operandentyp nicht anwendbar
<Edit> Ich kann wohl nicht AnsiLowerCase(ExtractFileExt(s)) = '.exe' vergleichen</Edit>
Jörn
Linux wird nie das meistinstallierte Betriebssystem sein, wenn man bedenkt, wie oft man Windows neu installieren muss!
  Mit Zitat antworten Zitat
zobien123

Registriert seit: 3. Mär 2017
Ort: Öhringen
32 Beiträge
 
Delphi XE2 Professional
 
#6

AW: Prüfen ob string auf '.exe' endet

  Alt 19. Mai 2017, 10:32
Okay hab es. War ein Dummheitsfehler

Code:
 
  if AnsiLowerCase(ExtractFileExt(s)) <> '.exe' then
  begin
    s := s + '.exe';
  end;

Danke für die Hilfe
Jörn
Linux wird nie das meistinstallierte Betriebssystem sein, wenn man bedenkt, wie oft man Windows neu installieren muss!
  Mit Zitat antworten Zitat
hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
5.729 Beiträge
 
Delphi XE4 Professional
 
#7

AW: Prüfen ob string auf '.exe' endet

  Alt 19. Mai 2017, 10:52
Hallo,
mit Pos oder Copy wäre das auch gegangen

if Pos('.exe',S)=Length(S)-4 (oder -3 )
if Copy(S,Length(S)-4,4)='.exe'

Das Upper darf der TE selber einfügen ...
Heiko
  Mit Zitat antworten Zitat
Delphi-Laie

Registriert seit: 25. Nov 2005
1.287 Beiträge
 
Delphi 10.1 Berlin Starter
 
#8

AW: Prüfen ob string auf '.exe' endet

  Alt 19. Mai 2017, 11:00
Ich würde vorher noch mit lowercase "normieren", denn so, wie es hier angeboten wird, wird z.B. ".EXE" nicht erfaßt, obwohl das eine zulässige Executable-Endung ist.

Geändert von Delphi-Laie (19. Mai 2017 um 11:08 Uhr)
  Mit Zitat antworten Zitat
Daniel
(Administrator)

Registriert seit: 30. Mai 2002
Ort: Hamburg
13.914 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#9

AW: Prüfen ob string auf '.exe' endet

  Alt 19. Mai 2017, 11:03
Ich nutze für sowas gern "EndsText()" aus der Unit System.StrUtils.
Wobei sich diese Funktion nur um Strings kümmert - ob das nun ein Dateiname ist, interessiert sie nicht.
Daniel R. Wolf
Admin Delphi-PRAXiS
mit Grüßen aus Hamburg
>> http://forentage.de
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
26.286 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#10

AW: Prüfen ob string auf '.exe' endet

  Alt 19. Mai 2017, 11:03
Delphi-Quellcode:
uses StrUtils;

...

if AnsiEndsText('.exe', s) then
  ...
[edit] @Cheffe [/edit]
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 21:47 Uhr.
Powered by vBulletin® Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2017 by Daniel R. Wolf