Как можно набирать тексь в Memo моим шрифтом который находится в папке с программой (т.е. на любом компьютере моя программа будет работать с этим шрифтом)

CreateScalableFontResource + AddFontResource + CreateFont + RemoveFontResource
+ F1

AddFontResource(FileName);
Однозначно