Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.250 Beiträge
 
Delphi 12 Athens
 
#8

Re: Durchsuchen nach einem gewissen String

  Alt 8. Aug 2008, 18:05
nur der Vollständigkeit halber:
Delphi-Quellcode:
for i:=1 to length(s) do
  if s[i] = '-then
  begin
    //Anweisung wenn String das Zeichen "-" enthält.
    Break;
  end;
Delphi-Quellcode:
// langsam
B := True;
for i:=1 to length(s) do
  if s[i] = '-then
    B := False;

if B then
begin
  //Anweisung wenn String das Zeichen "-" nicht enthält.
end;

// schneller
B := True;
for i:=1 to length(s) do
  if s[i] = '-then
  begin
    B := False;
    Break;
  end;

if B then
begin
  //Anweisung wenn String das Zeichen "-" nicht enthält.
end;
aber schneller und einfacher ist dennoch Pos
Delphi-Quellcode:
if Pos('-', s) = 0 then
begin
  //Anweisung wenn String das Zeichen "-" nicht enthält.
end;
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat