Hvis ord ikke findes

procedure TForm1.Button1Click(Sender: TObject);
begin
if pos('motor',richedit1.Text) < 1 then
memo1.Lines.Add('bla bla')
end;

Den er case-sensitiv

Stoney

if pos('motor',LowerCase(richedit1.Text)) < 1 then
memo1.Lines.Add('bla bla')

Så er den ikke case-sensitiv mere.

Ikke Case-Sensitive:
if not('MOTOR',ansiuppercase(richedit1.text)) <> 0 then
memo1.lines.add('yahooooo');

sorry, det var:
if not(pos('MOTOR',AnsiUpperCase(richedit1.text))) then
memo1.lines.add('yahooooo');

jo den er case-sensitiv, på en måde.

"UpperCase converts just A to Z to uppercase.
While AnsiUpperCase, according to the help file, uses currently installed language driver.
This means specific characters for your country are also included."

if not(pos('MOTOR',AnsiUpperCase(richedit1.text))) <> 0 then
memo1.lines.add('yahooooo');

- så skulle den være der ;)