Thema: Delphi String durchsuchen

Einzelnen Beitrag anzeigen

Benutzerbild von Uncle Cracker
Uncle Cracker

Registriert seit: 30. Mär 2003
Ort: Freital
694 Beiträge
 
#1

String durchsuchen

  Alt 30. Dez 2003, 18:51
Ich habe mir folgende Funktion gebastelt, um zu überprüfen, ob eine Datei eine DLL-Datei ist:

Code:
procedure TForm1.FormCreate(Sender: TObject);
begin
if(pos('.dll','C:\Test.dll') > 0) then
Label1.Caption:='DLL-Datei' else Label1.Caption:='Keine DLL-Datei'
end;
Klappt auch super, jedoch wenn die Datei Test.DLL heißt, geht es schon wieder nicht

Gibt es vielleicht ein kurze Möglichkeit, dass die Groß- und Kleinbuchstaben egal sind, denn ich möchte nicht alle möglichkeiten durch gehen, also dLL, dlL, DlL usw.


Danke UC
I wish it was legal to marry software because I'm madly in love with Delphi...
  Mit Zitat antworten Zitat