SQL og TEdit

aoADOQuery1.SQL.Add('Select * from Tabel Where ID = '+Edit1.Text);

....Add('select * from tabel where ID = ' + Edit1.Text);

hvis det er et tal - hvis det er andet end tal:

....Add('select * from tabel where ID = ''' + Edit1.Text + '''');

Hvis det er ' tegn i Edit1.Text skal du liiiiige tage højde for det ved at sætte \ foran ' tegnet.

Det er altid en god ide at starte med en close, en clear og derefter en add.
Det kan også være lettere at bruge en string variabel:

Sqlstreng := 'select * from table where id = "' + edit1.text + '"';
aoADOQuery1.Close;
aoADOQuery1.SQL.Clear;
aoADOQUery1.SQL.ADD(Sqlstreng);
aoADOQuery1.Open;