Поиск в таблице БД

[фЁдОр]

Ребят, а можетите дать ссылки по учебнику SQL или если у кого есть выложите, пожалуйста. А то я в нете искал, но ничего там путного не нашел.

[AlDelta]

1. http://programmersforum.ru/showthread.php?t=1589 Пост №2

2. Базы данных в Delphi Шумаков (3.22 мб)
http://www.programmersclub.ru/files/book_db.rar

[фЁдОр]

AlDelta, спасибо за ссылки!

[фЁдОр]

Ребят, сделал поиск по двум полям при помощи Locate:

procedure TForm1.BitBtn1Click(Sender: TObject);
var KeyFields: String;
    KeyValues: Variant;
      Options: TLocateOptions;
begin
 if not (CheckBox1.Checked or CheckBox2.Checked) then begin
    MessageDlg('Не заданы условия поиска', mtInformation, [mbOK], 0);
    exit;
    end;
 if CheckBox1.Checked and CheckBox2.Checked then begin
    KeyFields:='Firm.name;Adress';
    KeyValues:=VarArrayOf([Edit1.Text, Edit2.Text]);
    end
    else begin
      if CheckBox1.Checked then begin
        KeyFields:='firm.name';
        KeyValues:=Edit1.Text;
        end;
      if CheckBox2.Checked then begin
        KeyFields:='firm.Adress';
        KeyValues:=Edit2.Text;
        end;
    end;
Options:=[loCaseInsensitive, loPartialKey];
if not form1.ADOQueFirmRatissDisk.Locate(KeyFields, KeyValues, Options) then begin
   Beep;
   MessageDlg('Запись не найдена!', mtInformation, [mbOK], 0);
   exit;
   end;
end;

Поиск работает, ищет части записей удолетворяющие условию поиска, но проблема возникает в том, что не находится запись если часть вводимых символов для поиска находятся внутри записи.
Вот, к примеру, я хочу найти фирму Фаберлик, для этого, если я введу в edit1 фаб, то тогда фирма находится, а если я введу в edit1 берл, то фирма не находится. Подскажите, пожалуйста, как мне осуществить и такой поиск?