Einzelnen Beitrag anzeigen

Lefko

Registriert seit: 31. Jul 2003
359 Beiträge
 
Delphi 6 Enterprise
 
#13

Re: Überprüfen ob String in Array of String drinne ist.

  Alt 25. Apr 2004, 15:02
dann doch einfach so denke ich:

Delphi-Quellcode:
var i : integer;
    Buchst : boolean;
begin
Buchst := false;
for i := 0 to length(Temp1)-1 do
 if (Temp1[i] in ('a'..'z', 'A'..'Z', ...) then Buchst := true;
 
for i := 0 to length(Temp2)-1 do
 if (Temp2[i] in ('a'..'z', 'A'..'Z', ...) then Buchst := true;
 
if Buchst then Showmessage('Buchstaben drin!')
          else Showmessage('Keine Buchstaben gefunden!');
end;
ist jetzt ungetestet, aber ich glaube, das geht so, höchstens mit dem in könnte es des Syntax wegen noch haken

MfG Lefko.
Johannes
-=[Nennst du meinen Namen, bin ich schon nicht mehr da]=-
  Mit Zitat antworten Zitat