El contenido de la variable sCodigo debe ir entre comillas simples:
Código Delphi
[-]
SQL_Text := 'SELECT * FROM '+
sTabla + ' ' +
'WHERE ' +
sCampo + '= ' +
QuotedStr(sCodigo) + ';';
Además me uno a la sugerencia de casimiro de hecharle un vistazo al tutorial.