Einzelnen Beitrag anzeigen

delphi-n

Registriert seit: 6. Sep 2009
88 Beiträge
 
#11

Re: [GELÖST] string durchsuchen

  Alt 5. Okt 2009, 19:26
danke, funktioniert perfekt

[edit]:

in

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);

var S: string;
begin
  S := Edit1.Text;
if Pos('hallo', AnsiLowerString(S)) > 0 then
Button1.Visible:=false;
end;

MUSS der zu suchende text (hier hallo) KLEIN geschrieben werden, egal wie der Nutzer ihn dann schreibt, sonst klappt es nicht!

Ist mir beim Testen nur so aufgefallen
  Mit Zitat antworten Zitat