Create rufst du zwar nur einmal explizit auf, aber anschließend überschreibst du ja die Variable mit einer Referenz auf eine neue Instanz (die von FieldAsBlob zurückgegeben wird). Folglich wird beim Aufruf von Free am Ende nur eine von zwei Instanzen freigegeben.
TGraphic (wie auch TPicture) ist in der
Unit Graphics deklariert, die eigentlich standardmäßig eingebunden ist, wenn man ein neues Formular anlegt.