AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

*.txt auch in If abfrage ?

Ein Thema von Äfan · begonnen am 24. Jan 2005 · letzter Beitrag vom 24. Jan 2005
Antwort Antwort
Äfan
(Gast)

n/a Beiträge
 
#1

*.txt auch in If abfrage ?

  Alt 24. Jan 2005, 15:45
Hi,

Ich habe folgendes vor: Ich will überprüfen ob die Datei von einem bestimmten typ ist. Also ich habe z.B. den Dateinamen "MeinText.txt" in Edit1. Mir geht es darum, wenn der Dateiname Irgendwas.txt ist soll was passieren. Ich habe es schon mit '*.txt' also If Edit1.Text = '*.txt' then probiert, nur des geht net.

MFG
  Mit Zitat antworten Zitat
Benutzerbild von jfheins
jfheins

Registriert seit: 10. Jun 2004
Ort: Garching (TUM)
4.579 Beiträge
 
#2

Re: *.txt auch in If abfrage ?

  Alt 24. Jan 2005, 15:46
[oh]Get ExtractFileExt[/oh] oder so könnte dir helfen ...

(siehe Jelly's Post weiter unten ...)
  Mit Zitat antworten Zitat
Äfan
(Gast)

n/a Beiträge
 
#3

Re: *.txt auch in If abfrage ?

  Alt 24. Jan 2005, 15:48
Geht das net auch so, das er das mit dem text aus edit macht ?
  Mit Zitat antworten Zitat
Benutzerbild von Matze
Matze
(Co-Admin)

Registriert seit: 7. Jul 2003
Ort: Schwabenländle
14.929 Beiträge
 
Turbo Delphi für Win32
 
#4

Re: *.txt auch in If abfrage ?

  Alt 24. Jan 2005, 15:51
Zitat von Äfan:
Geht das net auch so, das er das mit dem text aus edit macht ?
Nur so, aber das ist nicht 100% sicher, da im Dateinamen selbt ja auch ".txt" vorkommen kann (Hallo.txt.exe)

if Pos('.txt', Edit1.Text) > 0 then Natürlich ginge auch die Delphi-Referenz durchsuchenFindFirst-Funktion, aber das ist übertrieben.
  Mit Zitat antworten Zitat
Äfan
(Gast)

n/a Beiträge
 
#5

Re: *.txt auch in If abfrage ?

  Alt 24. Jan 2005, 15:54
OK Danke

Zitat:
Natürlich ginge auch die Schau in die Delphi-HilfeFindFirst-Funktion, aber das ist übertrieben.
Ja, das wär echt zu viel !

MFG
  Mit Zitat antworten Zitat
Benutzerbild von Jelly
Jelly

Registriert seit: 11. Apr 2003
Ort: Moestroff (Luxemburg)
3.741 Beiträge
 
Delphi 2007 Professional
 
#6

Re: *.txt auch in If abfrage ?

  Alt 24. Jan 2005, 15:57
Delphi-Quellcode:
var
 ext : string ;
begin
    ext := uppercase (ExtractFileExt(Dateiname)) ;
    if ext = '.TXTthen ...
    if ext = '.XYZthen ...
end ;
Was ist daran auszusetzen?
  Mit Zitat antworten Zitat
BenjaminH

Registriert seit: 14. Okt 2004
Ort: Freiburg im Breisgau
713 Beiträge
 
Turbo Delphi für Win32
 
#7

Re: *.txt auch in If abfrage ?

  Alt 24. Jan 2005, 15:58
Wie wärs damit:
Delphi-Quellcode:
If Pos('.txt',Edit1.Text)>0 Then
Begin
End;
[Edit]Ups, sorry, bei mir wurden nur die ersten zwei Beiträge angezeigt, und ich dachte das wäre noch nicht genannt worden[/Edit]
Benjamin
  Mit Zitat antworten Zitat
Äfan
(Gast)

n/a Beiträge
 
#8

Re: *.txt auch in If abfrage ?

  Alt 24. Jan 2005, 16:04
@BenjaminH: Schau mal drei beiträge weiter oben

@Jelly: Werde ich gleich mal probieren.

MFG
  Mit Zitat antworten Zitat
Antwort Antwort


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:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 11:56 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz