Delphi - CORREJIR ERROR

if (Edit1 <> 'AREA') or (Edit2 <> 'FOLIO') or (Edit3 <> 'TITULO') or (Edit4 <> 'AUTOR') or (Edit5 <> 'EDITORIAL') or (Edit6 <> 'EDICION') or (Edit7 <> 'ISBN') or (Edit8 <> 'PAIS') or (Edit9 <> 'TEMA_1') or (Edit10 <> 'TEMA_2')then
begin
query1.SQL.clear;
query1.SQL.text:= 'INSERT INTO BLIBROS (AREA,FOLIO,TITULO,AUTOR,EDITORIAL,EDICION,ISBN,PAIS,TEMA_1,TEMA_2) VALUES('+ QuotedStr(Edit1.Text) + ',' + QuotedStr(Edit2.Text) + ','+ QuotedStr(Edit3.Text) + ',' + QuotedStr(Edit4.Text) + ',' + QuotedStr(Edit5.Text) + ',' + QuotedStr(Edit6.Text) + ',' + QuotedStr(Edit7.Text) +', ' + QuotedStr(Edit8.Text) +' , ' + QuotedStr(Edit9.Text) + ','+ QuotedStr(Edit10.Text) + ')';
query1.ExecSQL;
close;
end
else
SHOWMESSAGE('Ya estàn duplicados');

NO SE por que dice incompatibles tedit con string alguien me podria ayudar a correjir mi if gracias o decirme la sentencia correcctamente

Te falta decirle que vas a comparar del edit, en efecto un edit es un objeto, un string es un tipo de dato (por completo incompatibles), la propiedad Text del edit es tipo string, justo lo que necesitas comparar

(Edit1.Text <> 'AREA')

CorreGido.