[[eduarcol]]

lo que pasa es que esa funcion copy devuelve es un valor char

no tengo delphi a mano pero de pronto y esto te funciona:

Código Delphi [-]
if trim(copy(source, x, y)) = "" then
   //lo que quieras

en caso extremo

Código Delphi [-]
if trim(str(copy(source, x, y))) = "" then
   //lo que quieras

te digo que de pronto ni compile, pero por intentar nada se pierde, recuerda lo hice sin delphi asi q disculpa cualquier error