Bueno, hay un error en el código de ejemplo que te di, y está en:
Código Delphi
[-]
ListBox1.Items.IndexOf[ADOTable.FieldByName('Nombre iupac').AsString] = -1
Puse un paréntesis (
)) y debería ser una llave (
])...

error de dedo xDDD
Por cierto, recuerda que estos foros cuentan con las etiquetas
Delphi para publicar código fuente en Delphi...
Saludos...