No lo he mirado muy a fondo, pero así a simple vista creo que se te ha olvidado el .append o el .insert, salvo que sólo exista un registro en la tabla y siempre edites ese primer registro.
Código:
Diseno.Close;
Diseno.Open;
if Diseno.RecordCount>0 then
Begin
Diseno.Edit;
DisenoDISENO.LoadFromFile(Archivo);
Diseno.Post;
Diseno.Transaction.CommitRetaining;
end;