Код:
with ADOQuery1 do try
SQL.Text := 'Insert Into temptable (photo) Values (:pmphoto)';
так ты же сам очищаешь главный запрос в AdoQuery1, поэтому Grid и становится пустым, делай INSERT например в AdoQuery2, а потом обновляй AdoQuery1 (через Refresh или Close->Open)