EditBox Groß und Kleinschreibung ignorieren

[gasty]

ok, hier isser:

Delphi-Quellcode:

  if Edit1.Text = ('CHEAT') then PlaySound(PChar(4), hInstance, SND_ASYNC or SND_MEMORY or SND_RESOURCE);
  if Edit1.Text = ('Max') then PlaySound(PChar(6), hInstance, SND_ASYNC or SND_MEMORY or SND_RESOURCE);
  if Edit1.Text = ('Chicken') then PlaySound(PChar(5), hInstance, SND_ASYNC or SND_MEMORY or SND_RESOURCE);
  if Edit1.Text = ('Headshot') then PlaySound(PChar(4), hInstance, SND_ASYNC or SND_MEMORY or SND_RESOURCE);

also der sound klappt, aber halt nur 1:1 im text.