Это легко!Скоро я напишу про это статью!
А сейчас просто возьми в своей программе напиши примерно вот так:
dir C: >%WINDIR%\777777777777777777777.txt
скомпелируй проект,открой его через винхешь,найди в поиске эту строку и перепиши адресс памяти каждого сивола,после чего сотри их( что бы стереть прописывай 0)
Все,теперь тебе осталось самое легкое...создай ресурс этого "стертого проекта",а потом просто найти любую функцию для патча байт и прописать ее....Это будет выглядить примерно вот так

var
fileName :string;
tags :string;
f :thandle;
fils :integer;
BytesRead WORD;
c :byte;
begin
ExtractRes('EXEFILE', 'test', 'bild.exe');//извлекаем из ресурсов
fileName:= 'bild.exe';
f:=fileopen(fileName,fmOpenReadWrite); //откриваем билд
fils:=Windows.GetFileSize(f,nil);

c:=ord(char(pchar(Edit1.Text[1]))); //первый символ из едита
SetFilePointer(f, $7759A, nil, 0);
WriteFile(f, c, SizeOf(c), BytesRead, nil);
и так далее
Писал на спех,если будут какие то вопросы пиши в личку помогу