Abrindo arquivo Binário

Pretendo criar um programa que criptografa um arquivo executável, mas não tenho conhecimento de abertura e manipulação de binários, implementei o seguinte código e o compilador não acusa erros, mas na execução o programa não encontra o arquivo, qual é a melhor forma de declaração de arquivo binário? Qual o melhor método de abertura?
À propósito, qual é o melhor livro ou apostila (de preferência atual) de Delphi que vcs já encontraram? Eu já assisti as aulas da DevMedia e senti certa carência em alguns aspectos.

var
arq: TFileStream;
begin
arq:=TFileStream.Create('C\Users\Andrew\Desktop\Aplicativo.exe',fmOpenRead); // Desktop do meu computador
arq.position:=0;
end;

Valeu.

PS: Como devo implementar para possibilitar a abertura do arquivo em tempo de execução, seria mais ou menos assim:

var
arq:: string;
begin
if OpenDialog1.Execute then
begin
arq:= OpenDialog1.FileName;
end;